From c3c9871298597e417d67f691fca24cd913ef802a Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Tue, 24 Oct 2006 00:01:16 +0000
Subject: Moved all scalars out of ledger-smb.conf

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@268 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/cp.pl | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'bin/cp.pl')

diff --git a/bin/cp.pl b/bin/cp.pl
index 86ae69b2..be796242 100755
--- a/bin/cp.pl
+++ b/bin/cp.pl
@@ -452,7 +452,7 @@ sub payments_footer {
   $transdate = $form->datetonum(\%myconfig, $form->{datepaid});
   $closedto = $form->datetonum(\%myconfig, $form->{closedto});
   
-  if ($latex) {
+  if (${LedgerSMB::Sysconfig::latex}) {
    
     $media = qq|<select name=media>
           <option value=screen>|.$locale->text('Screen');
@@ -486,7 +486,7 @@ sub payments_footer {
 	     'Post' => { ndx => 4, key => 'O', value => $locale->text('Post') },
 	    ); 
 
-  if (! $latex) {
+  if (! ${LedgerSMB::Sysconfig::latex}) {
     delete $button{'Print'};
   }
 
@@ -1051,7 +1051,7 @@ sub payment_footer {
   $transdate = $form->datetonum(\%myconfig, $form->{datepaid});
   $closedto = $form->datetonum(\%myconfig, $form->{closedto});
 
-  if ($latex) {
+  if (${LedgerSMB::Sysconfig::latex}) {
     if ($form->{selectlanguage}) {
       $form->{"selectlanguage"} = $form->unescape($form->{"selectlanguage"});
       $form->{"selectlanguage"} =~ s/ selected//;
@@ -1088,7 +1088,7 @@ sub payment_footer {
 	     'Post' => { ndx => 4, key => 'O', value => $locale->text('Post') },
 	    ); 
 
-  if (! $latex) {
+  if (! ${LedgerSMB::Sysconfig::latex}) {
     delete $button{'Print'};
   }
 
@@ -1269,7 +1269,7 @@ sub print_form {
     $form->{OUT} = "| $printer{$form->{media}}";
   }
 
-  $form->parse_template(\%myconfig, $userspath);
+  $form->parse_template(\%myconfig, ${LedgerSMB::Sysconfig::userspath});
 
 }
 
@@ -1286,8 +1286,8 @@ sub print_payment {
   %temp = ();
   for (@a) { $temp{$_} = $form->{$_} }
 
-  if (scalar @{$form->{invnumber}} > $check_max_invoices) {
-    $#{$form->{invnumber}} = $check_max_invoices - 1;
+  if (scalar @{$form->{invnumber}} > ${LedgerSMB::Sysconfig::check_max_invoices}) {
+    $#{$form->{invnumber}} = ${LedgerSMB::Sysconfig::check_max_invoices} - 1;
     $form->{invnumbers_maxed} = 1;
     $form->{message} = $locale->text("Please see attatched report for list of invoices paid.");
   }
-- 
cgit v1.2.3