From: ivan <ivan>
Date: Tue, 27 Jul 2010 01:57:05 +0000 (+0000)
Subject: better pretty-printing for array values
X-Git-Tag: root_of_svc_elec_features~22
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=07da9c4c33b9ff573780052fc8994b492bb7bafb

better pretty-printing for array values
---

diff --git a/httemplate/misc/maestro-customer_status-test.html b/httemplate/misc/maestro-customer_status-test.html
index 16d4b5728..a75b88acb 100644
--- a/httemplate/misc/maestro-customer_status-test.html
+++ b/httemplate/misc/maestro-customer_status-test.html
@@ -7,10 +7,12 @@
 
 <table style="border:1px solid #000000">
 % foreach my $key (keys %$return) {
-  <TR>
-    <TD ALIGN="right"><% $key %>:</TD>
-    <TD><B><% $return->{$key} %></B></TD>
-  </TR>
+%   my $value = $return->{$key};
+%   $value = join(', ', @$value) if ref($value) eq 'ARRAY';
+    <TR>
+      <TD ALIGN="right"><% $key %>:</TD>
+      <TD><B><% $return->{$key} %></B></TD>
+    </TR>
 % }
 </table>