diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-07-04 23:04:16 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-07-04 23:04:16 +0000 |
commit | 025fd80e331af9a44552efd5be8ae35b4825e7f6 (patch) | |
tree | 4ca455281ae646c0174916434429b83331f2db04 /LedgerSMB/Template | |
parent | db4f7ef7438761c71a7b95cf955f74d3a7f25c1b (diff) |
Committing David Mora's single payment updates
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2185 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/Template')
-rwxr-xr-x | LedgerSMB/Template/LaTeX.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/LedgerSMB/Template/LaTeX.pm b/LedgerSMB/Template/LaTeX.pm index 973cb724..ea04bb80 100755 --- a/LedgerSMB/Template/LaTeX.pm +++ b/LedgerSMB/Template/LaTeX.pm @@ -77,8 +77,10 @@ sub preprocess { $vars = $rawvars; } #XXX Fix escaping - $vars =~ s/([&\$\\_<>~^#\%\{\}])/\\$1/g; - $vars =~ s/"(.*)"/``$1''/gs; + if (defined $vars){ + $vars =~ s/([&\$\\_<>~^#\%\{\}])/\\$1/g; + $vars =~ s/"(.*)"/``$1''/gs; + } } else { for ( keys %{$rawvars} ) { $vars->{$_} = preprocess($rawvars->{$_}); |