diff options
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/provision_list.html')
| -rw-r--r-- | fs_selfservice/FS-SelfService/cgi/provision_list.html | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/provision_list.html b/fs_selfservice/FS-SelfService/cgi/provision_list.html index 0f68dfe3c..88d1c848b 100644 --- a/fs_selfservice/FS-SelfService/cgi/provision_list.html +++ b/fs_selfservice/FS-SelfService/cgi/provision_list.html @@ -16,9 +16,11 @@ function areyousure(href, message) { ) { $OUT .= #'<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=2 BGCOLOR="#ffffff">'. - '<TR><TH BGCOLOR="#6666ff" COLSPAN=3>'. - $pkg->{'pkg'}. - '</TH></TR>'; + '<TR><TH BGCOLOR="#6666ff" COLSPAN=2>'. + $pkg->{'pkg'}. '</TH><TH BGCOLOR="#6666ff" >' . + qq!(<A style="font-size: smaller;color: #000000" HREF="! . + qq!${url}customer_change_pkg;pkgnum=$pkg->{'pkgnum'};pkg=$pkg->{'pkg'}">! . + 'change</A>)</TH></TR>'; my $col1 = "ffffff"; my $col2 = "dddddd"; @@ -75,7 +77,10 @@ function areyousure(href, message) { $OUT .= "<TR>$td COLSPAN=3 ALIGN=center>". qq!<A HREF="$link">!. 'Setup '. $part_svc->{'svc'}. '</A> '. '('. $part_svc->{'num_avail'}. ' available)'. - '</TD></TR>'; + '</TD></TR>' + #self-service only supports these services so far + if grep { $part_svc->{'svcdb'} eq $_ } qw( svc_acct svc_external ); + $col = $col eq $col1 ? $col2 : $col1; } |