diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-24 02:38:49 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-24 02:38:49 +0000 |
commit | b193f4e3c1c2b4e826ed1004b8c64d5e6e991ba8 (patch) | |
tree | 79152cd1bc3296d7783ab0b060e10c127c02cdd6 /bin/bp.pl | |
parent | 1b13895ec6bd39568353c1a4d66d55f733f56734 (diff) |
Moved %printer from ledger-smb.conf to Ledger::Sysconfig
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@281 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/bp.pl')
-rwxr-xr-x | bin/bp.pl | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -271,7 +271,7 @@ sub print { for $i (1 .. $form->{rowcount}) { if ($form->{"checked_$i"}) { - $form->{OUT} = "| $printer{$form->{media}}"; + $form->{OUT} = "| ${LedgerSMB::Sysconfig::printer}{$form->{media}}"; $form->info($locale->text('Printing')." ..."); if (BP->print_spool(\%myconfig, \%$form, ${LedgerSMB::Sysconfig::spool})) { @@ -496,8 +496,8 @@ sub list_spool { $form->hide_form(qw(callback title vc type sort module account path login sessionid)); - if (%printer && ${LedgerSMB::Sysconfig::latex}) { - foreach $key (sort keys %printer) { + if (%{LedgerSMB::Sysconfig::printer} && ${LedgerSMB::Sysconfig::latex}) { + foreach $key (sort keys %{LedgerSMB::Sysconfig::printer}) { print qq| <input name=media type=radio class=radio value="$key" |; print qq|checked| if $key eq $myconfig{printer}; |