diff options
| author | mark <mark> | 2011-12-19 23:16:51 +0000 |
|---|---|---|
| committer | mark <mark> | 2011-12-19 23:16:51 +0000 |
| commit | 43d2e192dfed48adc33af02b2dd98d66d5813e33 (patch) | |
| tree | b7b5c7968c944d06d9ac135123a66cd6f551bd02 /fs_selfservice/FS-SelfService | |
| parent | afa7df8f94208b1551237fd6591650f5363cc1fc (diff) | |
use detail formats to show CDRs in selfservice, #14923
Diffstat (limited to 'fs_selfservice/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>'; } %> |