diff options
| author | ivan <ivan> | 2006-11-24 10:34:33 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2006-11-24 10:34:33 +0000 |
| commit | 02ae3eb0e7e2371721956975dc9785fdb9993450 (patch) | |
| tree | aa5e26eb51ebf0016163632df9254b5851c093f1 /httemplate/browse/part_pkg.cgi | |
| parent | 39fd666a49b2be516967131a46891f17ce0101da (diff) | |
link to and label one-time charges correctly
Diffstat (limited to 'httemplate/browse/part_pkg.cgi')
| -rwxr-xr-x | httemplate/browse/part_pkg.cgi | 27 |
1 files changed, 21 insertions, 6 deletions
diff --git a/httemplate/browse/part_pkg.cgi b/httemplate/browse/part_pkg.cgi index f2364b152..b572f8ab5 100755 --- a/httemplate/browse/part_pkg.cgi +++ b/httemplate/browse/part_pkg.cgi @@ -94,28 +94,43 @@ %#if ( $cgi->param('active') ) { % push @header, 'Customer<BR>packages'; % my %col = ( -% 'active' => '00CC00', -% 'suspended' => 'FF9900', -% 'cancelled' => 'FF0000', +% 'active' => '00CC00', +% 'suspended' => 'FF9900', +% 'cancelled' => 'FF0000', +% #'one-time charge' => '000000', +% 'charge' => '000000', % ); % my $cust_pkg_link = $p. 'search/cust_pkg.cgi?pkgpart='; % push @fields, sub { my $part_pkg = shift; % [ % map { +% my $magic = $_; +% my $label = $_; +% if ( $magic eq 'active' && $part_pkg->freq == 0 ) { +% $magic = 'inactive'; +% #$label = 'one-time charge', +% $label = 'charge', +% } +% % [ % { -% 'data' => '<B><FONT COLOR="#'. $col{$_}. '">'. +% 'data' => '<B><FONT COLOR="#'. $col{$label}. '">'. % $part_pkg->get("num_$_"). % '</FONT></B>', % 'align' => 'right', % }, % { -% 'data' => $_, +% 'data' => $label. +% ( $part_pkg->get("num_$_") != 1 +% && $label =~ /charge$/ +% ? 's' +% : '' +% ), % 'align' => 'left', % 'link' => ( $part_pkg->get("num_$_") % ? $cust_pkg_link. % $part_pkg->pkgpart. -% ";magic=$_" +% ";magic=$magic" % : '' % ), % }, |