diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-08-05 16:27:36 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-08-05 16:27:36 +0000 |
| commit | 00e8d9a42eac75b66dc3024c6b32aab927b0bf69 (patch) | |
| tree | d59eb01c562596f402515d50d797bf612c40ad75 /LedgerSMB | |
| parent | 074d0d7379de945e0b663bb699c44567e32813a4 (diff) | |
Correcting more GMP incompatibilities
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2231 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
| -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 { |