From: ivan Date: Wed, 4 Aug 2010 01:26:32 +0000 (+0000) Subject: better serialization on debugging data, RT#7514 X-Git-Tag: freeside_2_1_1^2~187 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=6f5d1fb4f6d927fed8171e93559e96644406729f;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 );