summaryrefslogtreecommitdiff
path: root/bin/io.pl
diff options
context:
space:
mode:
authortetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-04-01 22:35:54 +0000
committertetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-04-01 22:35:54 +0000
commit93f62be003c9979b16dbf4c989bb34bf9ac5e304 (patch)
tree053ba6bb384a901caad972feee9b2595ff4083b0 /bin/io.pl
parent007780f7a885664171371e138296efc40311a770 (diff)
Fix print command selection in 1.2
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1019 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/io.pl')
-rwxr-xr-xbin/io.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/io.pl b/bin/io.pl
index 6e0e21d2..8dc422fc 100755
--- a/bin/io.pl
+++ b/bin/io.pl
@@ -1430,7 +1430,7 @@ sub print_form {
$form->{pre} = "<body bgcolor=#ffffff>\n<pre>" if $form->{format} eq 'txt';
if ($form->{media} !~ /(screen|queue|email)/) {
- $form->{OUT} = "${LedgerSMB::SysConfig::printer}{$form->{media}}";
+ $form->{OUT} = ${LedgerSMB::Sysconfig::printer}{$form->{media}};
$form->{printmode} = '|-';
$form->{OUT} =~ s/<%(fax)%>/<%$form->{vc}$1%>/;
$form->{OUT} =~ s/<%(.*?)%>/$form->{$1}/g;