From: ivan Date: Wed, 4 Aug 2010 01:26:33 +0000 (+0000) Subject: better serialization on debugging data, RT#7514 X-Git-Tag: freeside_1_9_5~87 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=91bb1d3f68a89f89e9d51e142b1eeadf1a81fc34;p=freeside.git better serialization on debugging data, RT#7514 --- diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index 3d7d76ce3..86ae105b3 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -828,9 +828,8 @@ sub _pretty { if ( ref($value) eq 'ARRAY' ) { '['. join(' ', map { ref($_) ? _pretty($_) : $_ } @$value ). ']'; } elsif ( ref($value) eq 'HASH' ) { - my $hv = $value->{$_}; join(', ', map { my $v = $value->{$_}; - "$_:". ref($v) ? _pretty($v) : $_ + "$_:". ( ref($v) ? _pretty($v) : $_ ); } keys %$value );