diff options
author | ivan <ivan> | 2001-10-24 15:29:31 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-10-24 15:29:31 +0000 |
commit | e6b57805f6b3e76448ab9b6d280f2c53bc1410f3 (patch) | |
tree | e05b4074ba546fa07a0da0587fb048b48ae21e23 /FS/FS/ConfItem.pm | |
parent | 40927c9cd9472719a3720270256f4300b81ebc98 (diff) |
preliminary web config editor
new config files: username-ampersand, passwordmax
fs-setup updates
get rid of old and crufty and unused registries/ config foo
documentation updates
Diffstat (limited to 'FS/FS/ConfItem.pm')
-rw-r--r-- | FS/FS/ConfItem.pm | 63 |
1 files changed, 63 insertions, 0 deletions
diff --git a/FS/FS/ConfItem.pm b/FS/FS/ConfItem.pm new file mode 100644 index 0000000..83295b4 --- /dev/null +++ b/FS/FS/ConfItem.pm @@ -0,0 +1,63 @@ +package FS::ConfItem; + +=head1 NAME + +FS::ConfItem - Configutaion option meta-data. + +=head1 SYNOPSIS + + use FS::Conf; + @config_items = $conf->config_items; + + foreach $item ( @config_items ) { + $key = $item->key; + $section = $item->section; + $description = $item->description; + } + +=head1 DESCRIPTION + +=head1 METHODS + +=over 4 + +=item new + +=cut + +sub new { + my $proto = shift; + my $class = ref($proto) || $proto; + my $self = @_ ? shift : {}; + bless ($self, $class); +} + +=item key + +=item section + +=item description + +=cut + +sub AUTOLOAD { + my $self = shift; + my $field = $AUTOLOAD; + $field =~ s/.*://; + $self->{$field}; +} + +=back + +=head1 BUGS + +Terse docs. + +=head1 SEE ALSO + +L<FS::Conf> + +=cut + +1; + |