diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-04-09 21:23:00 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-04-09 21:23:00 +0000 |
commit | 960ae04e2d468c89c8f9c3e9d3af4242d835ddfa (patch) | |
tree | 7ef27fa6186feba3e7c000681a7b09d8811742b5 /LedgerSMB | |
parent | 4f6a653aeadfe5055284f288ddf3b0f5b72c0833 (diff) |
Fixing logo printing
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1047 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-x | LedgerSMB/Form.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index b54745d3..5c249f4d 100755 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -39,6 +39,7 @@ use List::Util qw(first); use LedgerSMB::Mailer; use Time::Local; use Cwd; +use File::Copy; package Form; @@ -638,10 +639,16 @@ sub parse_template { $tmpfile =~ s/\./_$self->{fileid}./ if $self->{fileid}; $self->{tmpfile} = "${LedgerSMB::Sysconfig::tempdir}/${fileid}_${tmpfile}"; - my $temphash; + my $temphash; if ($self->{format} =~ /(postscript|pdf)/ || $self->{media} eq 'email') { $temphash{out} = $self->{OUT}; $self->{OUT} = "$self->{tmpfile}"; + File::Copy::copy( + "$self->{templates}/logo.png", + "${LedgerSMB::Sysconfig::tempdir}/"); + File::Copy::copy( + "$self->{templates}/logo.eps", + "${LedgerSMB::Sysconfig::tempdir}/"); $temphash{printmode} = $self->{printmode}; $self->{printmode} = '>'; } |