summaryrefslogtreecommitdiff
path: root/bin/cp.pl
diff options
context:
space:
mode:
Diffstat (limited to 'bin/cp.pl')
-rwxr-xr-xbin/cp.pl10
1 files changed, 5 insertions, 5 deletions
diff --git a/bin/cp.pl b/bin/cp.pl
index be796242..d6ef60b9 100755
--- a/bin/cp.pl
+++ b/bin/cp.pl
@@ -457,8 +457,8 @@ sub payments_footer {
$media = qq|<select name=media>
<option value=screen>|.$locale->text('Screen');
- if (%printer) {
- for (sort keys %printer) { $media .= qq|
+ if (%{LedgerSMB::Sysconfig::printer}) {
+ for (sort keys %{LedgerSMB::Sysconfig::printer}) { $media .= qq|
<option value="$_">$_| }
}
@@ -1064,8 +1064,8 @@ sub payment_footer {
$media = qq|<select name=media>
<option value=screen>|.$locale->text('Screen');
- if (%printer) {
- for (sort keys %printer) { $media .= qq|
+ if (%{LedgerSMB::Sysconfig::printer}) {
+ for (sort keys %{LedgerSMB::Sysconfig::printer}) { $media .= qq|
<option value="$_">$_| }
}
@@ -1266,7 +1266,7 @@ sub print_form {
$form->{IN} = "$form->{formname}.tex";
if ($form->{media} ne 'screen') {
- $form->{OUT} = "| $printer{$form->{media}}";
+ $form->{OUT} = "| ${LedgerSMB::Sysconfig::printer}{$form->{media}}";
}
$form->parse_template(\%myconfig, ${LedgerSMB::Sysconfig::userspath});