diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-11-02 21:50:27 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-11-02 21:50:27 +0000 |
commit | b061afa04f88b3bceca4a1058a5fee2812bdd593 (patch) | |
tree | a0579bbe00fa572eb91b984df6366f69432fb22d /bin | |
parent | c1f06b98f4cbce55c14c014b12f3c127ce8d4a44 (diff) |
Handle <br> and $form->address in templates
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1842 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin')
-rw-r--r-- | bin/rp.pl | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -1057,9 +1057,8 @@ sub generate_income_statement { # setup variables for the form my @vars = qw(company address businessnumber); for (@vars) { $form->{$_} = $myconfig{$_} } - ##SC: START HTML + ##SC: The escaped form will be converted in-template $form->{address} =~ s/\\n/<br>/g; - ##SC: END HTML my $template = LedgerSMB::Template->new( @@ -1107,9 +1106,8 @@ sub generate_balance_sheet { for (qw(company address businessnumber nativecurr login)) { $form->{$_} = $myconfig{$_}; } - ##SC: START HTML + ##SC: The escaped form will be converted in-template $form->{address} =~ s/\\n/<br>/g; - ##SC: END HTML $form->{templates} = $myconfig{templates}; |