SF.net SVN: ledger-smb: [1524] branches/1.2/bin/pos.pl

[..hidden..]

Revision: 1524
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=1524&view=rev
Author:   einhverfr
Date:     2007-09-06 14:10:14 -0700 (Thu, 06 Sep 2007)

Log Message:
-----------
Correcting minor bug in till account selection.

Modified Paths:
--------------
    branches/1.2/bin/pos.pl

Modified: branches/1.2/bin/pos.pl
===================================================================
--- branches/1.2/bin/pos.pl	2007-09-06 20:54:42 UTC (rev 1523)
+++ branches/1.2/bin/pos.pl	2007-09-06 21:10:14 UTC (rev 1524)
@@ -510,10 +510,9 @@
         $column_data{cctrack} = qq|<td><input type="text" name="cctrack_$i"
 	value="| . $form->{"cctrack_$i"} . qq|" size="3"></td>|;
 
-        if ( $pos_config{"coa_prefix"} ) {
+        if ( $pos_config{till_accno} ) {
             if ( !$form->{"AR_paid_$i"} ) {
-                $form->{"AR_paid_$i"} =
-                  $pos_config{"coa_prefix"} . '.' . $pos_config{"till"};
+                $form->{"AR_paid_$i"} = $pos_config{till_accno};
             }
             $column_data{AR_paid} = qq|<input type=hidden name="AR_paid_$i" 
                   value='$form->{"AR_paid_$i"}'>|;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.