<TABLE BGCOLOR="#cccccc" BORDER=1 CELLSPACING=0 CELLPADDING=0 BORDERCOLOR="#999999">
<tr>
<th colspan="2" bgcolor="#dcdcdc">
- <% ucfirst($section || 'unclassified') %> configuration options
+ <% ucfirst($section || 'unclassified') %>
+% if ( $curuser->option('show_confitem_counts') ) {
+ (<% scalar( @{ $section_items{$section} } ) %> items)
+% }
</th>
</tr>
% foreach my $i (@{ $section_items{$section} }) {
<tr>
<td id="<% $agentnum.$i->key.$n %>" bgcolor="#ffffff">
+% if ( $i->multiple ) {
+ <% join('<BR>',
+ map { $_ . ": " . &{ $i->option_sub }($_) }
+ $conf->config($i->key,$agentnum)
+ )
+ %>
+% } else {
<% $conf->config($i->key, $agentnum) %>:
<% &{ $i->option_sub }( $conf->config($i->key, $agentnum) ) %>
+% }
</td>
</tr>
-% } elsif ( $type =~ /^select-(part_svc|part_pkg|pkg_class)$/ ) {
+% } elsif ( $type =~ /^select-(part_svc|part_pkg|pkg_class|agent)$/ ) {
%
% my $table = $1;
% my $namecol = $namecol{$table};
'part_svc' => 'svc',
'part_pkg' => 'pkg',
'pkg_class' => 'classname',
+ 'agent' => 'agent',
);
</%once>
<%init>
-die "access denied"
- unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
+my $curuser = $FS::CurrentUser::CurrentUser;
+
+die "access denied" unless $curuser->access_right('Configuration');
my $page_agent = '';
my $title;
my @deleteable = qw( invoice_latexreturnaddress invoice_htmlreturnaddress );
my %deleteable = map { $_ => 1 } @deleteable;
-my @sections = qw(required billing username password UI session shell BIND );
+my @sections = qw(required billing invoicing notification UI self-service ticketing username password session shell BIND telephony );
push @sections, '', 'deprecated';
my %section_items = ();