diff options
| -rwxr-xr-x | LedgerSMB/Template/CSV.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/LedgerSMB/Template/CSV.pm b/LedgerSMB/Template/CSV.pm index 2ba90e0f..a1f92a19 100755 --- a/LedgerSMB/Template/CSV.pm +++ b/LedgerSMB/Template/CSV.pm @@ -62,7 +62,8 @@ sub preprocess { for (@{$rawvars}) { push @{$vars}, preprocess( $_ ); } - } elsif ( !$type or $type eq 'SCALAR' ) { # Scalar + } elsif ( !$type or $type eq 'SCALAR' or $type eq 'Math::BigInt::GMP') { + # Scalars or GMP objects (which are SCALAR refs) --CT if ($type eq 'SCALAR' or $type eq 'Math::BigInt::GMP') { $vars = $$rawvars; } else { |