FS/FS/ConfItem.pm

   1 package FS::ConfItem;
   2
   3 =head1 NAME
   4
   5 FS::ConfItem - Configuration option meta-data.
   6
   7 =head1 SYNOPSIS
   8
   9   use FS::Conf;
  10   @config_items = $conf->config_items;
  11
  12   foreach $item ( @config_items ) {
  13     $key = $item->key;
  14     $section = $item->section;
  15     $description = $item->description;
  16   }
  17
  18 =head1 DESCRIPTION
  19
  20 =head1 METHODS
  21
  22 =over 4
  23
  24 =item new
  25
  26 =cut
  27
  28 sub new {
  29   my $proto = shift;
  30   my $class = ref($proto) || $proto;
  31   my $self = @_ ? shift : {};
  32   bless ($self, $class);
  33 }
  34
  35 =item key
  36
  37 =item section
  38
  39 =item description
  40
  41 =cut
  42
  43 sub AUTOLOAD {
  44   my $self = shift;
  45   my $field = $AUTOLOAD;
  46   $field =~ s/.*://;
  47   $self->{$field};
  48 }
  49
  50 =back
  51
  52 =head1 BUGS
  53
  54 Terse docs.
  55
  56 =head1 SEE ALSO
  57
  58 L<FS::Conf>
  59
  60 =cut
  61
  62 1;
  63