diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-06-01 14:13:33 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-06-01 14:13:33 +0000 |
commit | 5deb0455ef5b5a2ffe8cbe26a75cdd07e8788ded (patch) | |
tree | 2f1ff13c7c66bb7a4449fbe1cd0d30b24fc15187 /bin/arapprn.pl | |
parent | 131a6de0170f0e79cc27cc77e972487ca9c5c33f (diff) |
Templating updates for output handling
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1248 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/arapprn.pl')
-rw-r--r-- | bin/arapprn.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/arapprn.pl b/bin/arapprn.pl index 845d829a..b1885e66 100644 --- a/bin/arapprn.pl +++ b/bin/arapprn.pl @@ -290,7 +290,7 @@ sub print_check { format => uc $form->{'format'} ); try { $template->render($form); - $template->output($form->{'media'}); + $template->output(%{$form}); } catch Error::Simple with { my $E = shift; @@ -558,7 +558,7 @@ sub print_transaction { format => uc $form->{format} ); try { $template->render($form); - $template->output($form->{media}); + $template->output(%{$form}); } catch Error::Simple with { my $E = shift; |