diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-13 17:45:30 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-13 17:45:30 +0000 |
| commit | 576020a9432cba748ade22242be42e513f49b67f (patch) | |
| tree | aa10f040d59cac2178f20fc30a3b0c1158a513f0 /LedgerSMB/Template | |
| parent | 02d0ce186cfc17daba79f9c63fb0fe6061e9a766 (diff) | |
Adding a debug flag
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1584 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/Template')
| -rwxr-xr-x | LedgerSMB/Template/CSV.pm | 2 | ||||
| -rwxr-xr-x | LedgerSMB/Template/HTML.pm | 4 | ||||
| -rwxr-xr-x | LedgerSMB/Template/PDF.pm | 2 | ||||
| -rwxr-xr-x | LedgerSMB/Template/PS.pm | 2 | ||||
| -rwxr-xr-x | LedgerSMB/Template/TXT.pm | 2 |
5 files changed, 11 insertions, 1 deletions
diff --git a/LedgerSMB/Template/CSV.pm b/LedgerSMB/Template/CSV.pm index c0ff7276..9f494d69 100755 --- a/LedgerSMB/Template/CSV.pm +++ b/LedgerSMB/Template/CSV.pm @@ -81,6 +81,8 @@ sub process { START_TAG => quotemeta('<?lsmb'), END_TAG => quotemeta('?>'), DELIMITER => ';', + DEBUG => ($parent->{debug})? 'dirs': undef, + DEBUG_FORMAT => '', }) || throw Error::Simple Template->error(); if (not $template->process( diff --git a/LedgerSMB/Template/HTML.pm b/LedgerSMB/Template/HTML.pm index 6ec7b833..ae518e18 100755 --- a/LedgerSMB/Template/HTML.pm +++ b/LedgerSMB/Template/HTML.pm @@ -75,12 +75,14 @@ sub process { my $parent = shift; my $cleanvars = shift; my $template; - + $template = Template->new({ INCLUDE_PATH => $parent->{include_path}, START_TAG => quotemeta('<?lsmb'), END_TAG => quotemeta('?>'), DELIMITER => ';', + DEBUG => ($parent->{debug})? 'dirs': undef, + DEBUG_FORMAT => '', }) || throw Error::Simple Template->error(); if (not $template->process( get_template($parent->{template}), diff --git a/LedgerSMB/Template/PDF.pm b/LedgerSMB/Template/PDF.pm index 9c315d62..aca26f71 100755 --- a/LedgerSMB/Template/PDF.pm +++ b/LedgerSMB/Template/PDF.pm @@ -81,6 +81,8 @@ sub process { START_TAG => quotemeta('<?lsmb'), END_TAG => quotemeta('?>'), DELIMITER => ';' + DEBUG => ($parent->{debug})? 'dirs': undef, + DEBUG_FORMAT => '', }) || throw Error::Simple Template::Latex->error(); if (not $template->process( diff --git a/LedgerSMB/Template/PS.pm b/LedgerSMB/Template/PS.pm index f8c048d0..9833dba1 100755 --- a/LedgerSMB/Template/PS.pm +++ b/LedgerSMB/Template/PS.pm @@ -81,6 +81,8 @@ sub process { START_TAG => quotemeta('<?lsmb'), END_TAG => quotemeta('?>'), DELIMITER => ';', + DEBUG => ($parent->{debug})? 'dirs': undef, + DEBUG_FORMAT => '', }) || throw Error::Simple Template::Latex->error(); if (not $template->process( diff --git a/LedgerSMB/Template/TXT.pm b/LedgerSMB/Template/TXT.pm index a950335f..055a6cdd 100755 --- a/LedgerSMB/Template/TXT.pm +++ b/LedgerSMB/Template/TXT.pm @@ -62,6 +62,8 @@ sub process { START_TAG => quotemeta('<?lsmb'), END_TAG => quotemeta('?>'), DELIMITER => ';', + DEBUG => ($parent->{debug})? 'dirs': undef, + DEBUG_FORMAT => '', }) || throw Error::Simple Template->error(); if (not $template->process( |