diff options
author | mark <mark> | 2011-12-19 23:16:28 +0000 |
---|---|---|
committer | mark <mark> | 2011-12-19 23:16:28 +0000 |
commit | 3dbb7d158b87c6bab8467e8f1fae8be5c59d0153 (patch) | |
tree | da37f5c1c81a84525c5f80ed33bf75c6a9c84462 /fs_selfservice | |
parent | 8291a2d7cc38b1fcbe081da2bd78d4250a993250 (diff) |
use detail formats to show CDRs in selfservice, #14923
Diffstat (limited to 'fs_selfservice')
-rw-r--r-- | fs_selfservice/FS-SelfService/cgi/view_cdr_details.html | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/view_cdr_details.html b/fs_selfservice/FS-SelfService/cgi/view_cdr_details.html index 620fa2218..b0205ec89 100644 --- a/fs_selfservice/FS-SelfService/cgi/view_cdr_details.html +++ b/fs_selfservice/FS-SelfService/cgi/view_cdr_details.html @@ -9,7 +9,7 @@ <%= if ( $error ) { $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!; } ''; %> - + <TABLE WIDTH="100%"> <TR> <TD WIDTH="50%"> @@ -32,9 +32,11 @@ </TABLE> <TABLE BGCOLOR="#cccccc"> <TR> -<%= foreach my $header (@header) { - $OUT .= qq(<TH ALIGN="right">$header</TH>); - } +<%= $space = '<TD> </TD>'; + $OUT .= join($space, + map { '<TH ALIGN="right">'.$_.'</TH>' } + @header + ) %> </TR> <%= my $total = 0; @@ -42,7 +44,9 @@ my $dtotal = 0; foreach my $usage ( @usage ) { $OUT .= '<TR>'; - $OUT .= qq(<TD>$_</TD>) foreach @{$usage}; + $OUT .= join($space, + map { "<TD>$_</TD>" } @{$usage} + ); $OUT .= '</TR>'; } %> |