summaryrefslogtreecommitdiff
path: root/LedgerSMB/CP.pm
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-10-24 03:45:40 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-10-24 03:45:40 +0000
commit04fce104fb69421a95b8166750f84c184ff9d932 (patch)
tree2b0a25966be483efc6dc435e0af08c083c9c800e /LedgerSMB/CP.pm
parent4e1902377b63a53dbd1df8d0f07c2537b77ec94d (diff)
Fixing breadead mistakes when moving variables to new namespace
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@284 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/CP.pm')
-rwxr-xr-xLedgerSMB/CP.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm
index 68499753..695708a5 100755
--- a/LedgerSMB/CP.pm
+++ b/LedgerSMB/CP.pm
@@ -268,7 +268,7 @@ sub get_openinvoices {
my $vth = $dbh->prepare($query);
- my ${LedgerSMB::Sysconfig::spool}file;
+ my $spoolfile;
while ($ref = $sth->fetchrow_hashref(NAME_lc)) {
@@ -278,8 +278,8 @@ sub get_openinvoices {
$vth->execute($ref->{id});
$ref->{queue} = "";
- while ((${LedgerSMB::Sysconfig::spool}file) = $vth->fetchrow_array) {
- $ref->{queued} .= "$form->{formname} ${LedgerSMB::Sysconfig::spool}file ";
+ while (($spoolfile) = $vth->fetchrow_array) {
+ $ref->{queued} .= "$form->{formname} $spoolfile ";
}
$vth->finish;