diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-24 03:45:40 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-24 03:45:40 +0000 |
commit | 04fce104fb69421a95b8166750f84c184ff9d932 (patch) | |
tree | 2b0a25966be483efc6dc435e0af08c083c9c800e /LedgerSMB/CP.pm | |
parent | 4e1902377b63a53dbd1df8d0f07c2537b77ec94d (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-x | LedgerSMB/CP.pm | 6 |
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; |