From 07da9c4c33b9ff573780052fc8994b492bb7bafb Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 27 Jul 2010 01:57:05 +0000
Subject: [PATCH] better pretty-printing for array values

---
 httemplate/misc/maestro-customer_status-test.html | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

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>
 
-- 
2.11.0