From 00e8d9a42eac75b66dc3024c6b32aab927b0bf69 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Tue, 5 Aug 2008 16:27:36 +0000
Subject: Correcting more GMP incompatibilities

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2231 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/Template/CSV.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'LedgerSMB')

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 {
-- 
cgit v1.2.3