<%= header('View Configuration', menubar( 'Main Menu' => $p,
'Edit Configuration' => 'config.cgi' ) ) %>
<% my $conf = new FS::Conf; my @config_items = $conf->config_items; %>
<% foreach my $section ( qw(required billing username password UI session
shell BIND
),
'', 'deprecated') { %>
<% foreach my $nav_section ( qw(required billing username password UI session
shell BIND
),
'', 'deprecated') { %>
<% if ( $section eq $nav_section ) { %>
[<%= ucfirst($nav_section || 'unclassified') %>]
<% } else { %>
[<%= ucfirst($nav_section || 'unclassified') %>]
<% } %>
<% } %>
<%= table("#cccccc", 2) %>
|
<%= ucfirst($section || 'unclassified') %> configuration options
|
<% foreach my $i (grep $_->section eq $section, @config_items) { %>
|
<%= $i->key %> - <%= $i->description %>
|
<% foreach my $type ( ref($i->type) ? @{$i->type} : $i->type ) {
my $n = 0; %>
<% if ( $type eq '' ) { %>
| no type |
<% } elsif ( $type eq 'textarea'
|| $type eq 'editlist'
|| $type eq 'selectmultiple' ) { %>
<%= encode_entities(join("\n", $conf->config($i->key) ) ) %>
|
<% } elsif ( $type eq 'checkbox' ) { %>
| YES' : 'ff0000">NO' %> |
<% } elsif ( $type eq 'text' || $type eq 'select' ) { %>
| <%= $conf->exists($i->key) ? $conf->config($i->key) : '' %> |
<% } else { %>
|
unknown type <%= $type %>
|
<% } %>
<% $n++; } %>
|
<% } %>
<% } %>