summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xLedgerSMB/Template/HTML.pm3
-rwxr-xr-xLedgerSMB/Template/LaTeX.pm2
2 files changed, 3 insertions, 2 deletions
diff --git a/LedgerSMB/Template/HTML.pm b/LedgerSMB/Template/HTML.pm
index ca748dd3..7b3544fd 100755
--- a/LedgerSMB/Template/HTML.pm
+++ b/LedgerSMB/Template/HTML.pm
@@ -66,9 +66,10 @@ sub preprocess {
}
} elsif (!$type) {
return escapeHTML($rawvars);
- } elsif ($type eq 'SCALAR') {
+ } elsif ($type eq 'SCALAR' or $type eq 'Math::BigInt::GMP') {
return escapeHTML($$rawvars);
} else { # Hashes and objects
+ print STDERR "$_ is $type:$rawvars";
for ( keys %{$rawvars} ) {
$vars->{preprocess($_)} = preprocess( $rawvars->{$_} );
}
diff --git a/LedgerSMB/Template/LaTeX.pm b/LedgerSMB/Template/LaTeX.pm
index ea04bb80..71ddfce8 100755
--- a/LedgerSMB/Template/LaTeX.pm
+++ b/LedgerSMB/Template/LaTeX.pm
@@ -71,7 +71,7 @@ sub preprocess {
push @{$vars}, preprocess($_);
}
} elsif (!$type or $type eq 'SCALAR') {
- if ($type eq 'SCALAR') {
+ if ($type eq 'SCALAR' or $type eq 'Math::BigInt::GMP') {
$vars = $$rawvars;
} else {
$vars = $rawvars;