diff options
-rw-r--r-- | FS/FS/part_export/communigate_pro.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index 86ae105b3..90e697705 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -828,11 +828,12 @@ sub _pretty { if ( ref($value) eq 'ARRAY' ) { '['. join(' ', map { ref($_) ? _pretty($_) : $_ } @$value ). ']'; } elsif ( ref($value) eq 'HASH' ) { - join(', ', map { my $v = $value->{$_}; - "$_:". ( ref($v) ? _pretty($v) : $_ ); - } - keys %$value - ); + '{'. join(', ', + map { my $v = $value->{$_}; + "$_:". ( ref($v) ? _pretty($v) : $_ ); + } + keys %$value + ). '}'; } else { warn "serializing ". ref($value). " for table display not yet handled"; } |