X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fconfig%2Fconfig-view.cgi;h=08f6c1020b8e70ee0f210fbe5987978a78a1f4b3;hb=a6bd5190b8b5434c6b59517fc6467491e00e2edb;hp=bb6a3ca0bf33bc514074ebfbb0289d6be3f8ba59;hpb=983584fdcdfb282750f6b40beb5e1c43cc498274;p=freeside.git
diff --git a/httemplate/config/config-view.cgi b/httemplate/config/config-view.cgi
index bb6a3ca0b..08f6c1020 100644
--- a/httemplate/config/config-view.cgi
+++ b/httemplate/config/config-view.cgi
@@ -43,12 +43,16 @@ Click on a configuration value to change it.
- <% ucfirst($section || 'unclassified') %> configuration options
+ <% ucfirst($section || 'unclassified') %>
+% if ( $curuser->option('show_confitem_counts') ) {
+ (<% scalar( @{ $section_items{$section} } ) %> items)
+% }
|
% foreach my $i (@{ $section_items{$section} }) {
% my @types = ref($i->type) ? @{$i->type} : ($i->type);
-% my( $width, $height ) = ( 522, 336 );
+%# my( $width, $height ) = ( 522, 336 );
+% my( $width, $height ) = ( 600, 336 );
% if ( grep $_ eq 'textarea', @types ) {
% #800x600
% $width = 763;
@@ -58,11 +62,28 @@ Click on a configuration value to change it.
% #$height =
% }
%
-% my @agents = $page_agent ? ( $page_agent ) : ( '', @all_agents );
+% my @agents = ();
+% my @add_agents = ();
+% if ( $page_agent ) {
+% @agents = ( $page_agent );
+% } else {
+% @agents = ( '' );
+% if ( $i->per_agent ) {
+% foreach my $agent (@all_agents) {
+% if ( defined($conf->conf( $i->key, $agent->agentnum, 1 ) ) ) {
+% push @agents, $agent;
+% } else {
+% push @add_agents, $agent;
+% }
+% }
+% }
+% }
%
% foreach my $agent ( @agents ) {
% my $agentnum = $agent ? $agent->agentnum : '';
%
+% next if $section eq 'deprecated' && ! $conf->exists($i->key, $agentnum);
+%
% my $label = $i->key;
% $label = '['. $agent->agent. "] $label"
% if $agent && $cgi->param('showagent');
@@ -81,6 +102,19 @@ Click on a configuration value to change it.
# if $cgi->param('showagent')?
)
%>: <% $i->description %>
+% if ( $agent && $cgi->param('showagent') ) {
+% my $confnum = $conf->conf( $i->key, $agent->agentnum, 1 )->confnum;
+ (delete agent override)
+% } elsif ( $i->base_key
+% || ( $deleteable{$i->key} && $conf->exists($i->key) ) ) {
+% my $confnum =
+% $agent
+% ? $conf->conf( $i->key, $agent->agentnum, 1 )->confnum
+% : $conf->conf( $i->key )->confnum;
+% my $showagent = $cgi->param('showagent') ? '_showagent' : '';
+ (delete configuration item)
+% }
+
@@ -126,7 +160,9 @@ Click on a configuration value to change it.
% } elsif ( $type eq 'textarea'
% || $type eq 'editlist'
-% || $type eq 'selectmultiple' ) {
+% || $type eq 'selectmultiple'
+% )
+% {
@@ -167,7 +203,7 @@ Click on a configuration value to change it.
|
-% } elsif ( $type eq 'select-sub' ) {
+% } elsif ( $type eq 'select-sub' ) {
@@ -176,12 +212,33 @@ Click on a configuration value to change it.
|
-% } else {
+% } elsif ( $type =~ /^select-(part_svc|part_pkg|pkg_class)$/ ) {
+%
+% my $table = $1;
+% my $namecol = $namecol{$table};
+% my $pkey = dbdef->table($table)->primary_key;
+%
+% my @keys = $conf->config($i->key, $agentnum);
+
+
+
+ <% join( ' ',
+ map {
+ my $key = $_;
+ my $record = qsearchs($table, { $pkey => $key });
+ $record ? "$key: ".$record->$namecol() : $key;
+ } @keys
+ )
+ %>
+ |
+
+
+% } else {
unknown type <% $type %>
|
-% }
+% }
% $n++;
% }
@@ -190,31 +247,84 @@ Click on a configuration value to change it.
% } # foreach my $agentnum
+% if ( @add_agents ) {
+
+
+
+
+ |
+
+
+% } #if @add_agents
+
% } # foreach my $i
% } # foreach my $nav_section
- |