summaryrefslogtreecommitdiff
path: root/bin/bp.pl
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-10-24 02:38:49 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-10-24 02:38:49 +0000
commitb193f4e3c1c2b4e826ed1004b8c64d5e6e991ba8 (patch)
tree79152cd1bc3296d7783ab0b060e10c127c02cdd6 /bin/bp.pl
parent1b13895ec6bd39568353c1a4d66d55f733f56734 (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-xbin/bp.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/bin/bp.pl b/bin/bp.pl
index e1dc01eb..ffbe2544 100755
--- a/bin/bp.pl
+++ b/bin/bp.pl
@@ -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};