From b193f4e3c1c2b4e826ed1004b8c64d5e6e991ba8 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Tue, 24 Oct 2006 02:38:49 +0000
Subject: 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
---
 bin/cp.pl | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'bin/cp.pl')

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});
-- 
cgit v1.2.3