diff options
| -rwxr-xr-x | LedgerSMB/Template/PDF.pm | 4 | ||||
| -rwxr-xr-x | LedgerSMB/Template/PS.pm | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/LedgerSMB/Template/PDF.pm b/LedgerSMB/Template/PDF.pm index aca26f71..557a5d09 100755 --- a/LedgerSMB/Template/PDF.pm +++ b/LedgerSMB/Template/PDF.pm @@ -57,7 +57,7 @@ sub preprocess { for (@{$rawvars}) { push @{$vars}, preprocess($_); } - } else (!$type) { + } elsif (!$type) { #XXX Fix escaping $rawvars =~ s/([&\$\\_<>~^#\%\{\}])/\\$1/g; $rawvars =~ s/"(.*)"/``$1''/gs; @@ -80,7 +80,7 @@ sub process { INCLUDE_PATH => $parent->{include_path}, START_TAG => quotemeta('<?lsmb'), END_TAG => quotemeta('?>'), - DELIMITER => ';' + DELIMITER => ';', DEBUG => ($parent->{debug})? 'dirs': undef, DEBUG_FORMAT => '', }) || throw Error::Simple Template::Latex->error(); diff --git a/LedgerSMB/Template/PS.pm b/LedgerSMB/Template/PS.pm index 9833dba1..ca80066b 100755 --- a/LedgerSMB/Template/PS.pm +++ b/LedgerSMB/Template/PS.pm @@ -57,7 +57,7 @@ sub preprocess { for (@{$rawvars}) { push @{$vars}, preprocess($_); } - } else (!$type) { + } elsif (!$type) { #XXX Fix escaping $rawvars =~ s/([&\$\\_<>~^#\%\{\}])/\\$1/g; $rawvars =~ s/"(.*)"/``$1''/gs; |