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 16d4b57..a75b88a 100644 (file)
--- 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>