Adjust BP/bp to run

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@361 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 2 insertions, 2 deletions

diff --git a/bin/bp.pl b/bin/bp.pl
index ffbe2544..04b6ba78 100755
--- a/bin/bp.pl
+++ b/bin/bp.pl
@@ -432,7 +432,7 @@ sub list_spool {
     
     $column_data{transdate} = "<td>$ref->{transdate}&nbsp;</td>";
 
-    if (${LedgerSMB::Sysconfig::spool}file eq $ref->{spoolfile}) {
+    if (${LedgerSMB::Sysconfig::spool} eq $ref->{spoolfile}) {
       $column_data{checked} = qq|<td></td>|;
     } else {
       $column_data{checked} = qq|<td><input name=checked_$i type=checkbox class=checkbox $form->{"checked_$i"} $form->{"checked_$i"}></td>|;
@@ -462,7 +462,7 @@ sub list_spool {
 
 |;
 
-    ${LedgerSMB::Sysconfig::spool}file = $ref->{spoolfile};
+    ${LedgerSMB::Sysconfig::spool} = $ref->{spoolfile};
     
     $j++; $j %= 2;
     print "