SF.net SVN: ledger-smb: [1841] trunk/bin/pos.pl

[..hidden..]

Revision: 1841
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=1841&view=rev
Author:   einhverfr
Date:     2007-11-02 10:35:06 -0700 (Fri, 02 Nov 2007)

Log Message:
-----------
Corrected POS bug-- when print and post triggers update, it also opens the drawer.

Modified Paths:
--------------
    trunk/bin/pos.pl

Modified: trunk/bin/pos.pl
===================================================================
--- trunk/bin/pos.pl	2007-11-02 17:34:23 UTC (rev 1840)
+++ trunk/bin/pos.pl	2007-11-02 17:35:06 UTC (rev 1841)
@@ -904,8 +904,6 @@
 
 
 sub print {
-    open_drawer();
-    sleep 1;
     if ( !$form->{invnumber} ) {
         $form->{invnumber} = $form->update_defaults( \%myconfig, 'sinumber' );
     }
@@ -918,6 +916,8 @@
         &update;
         exit;
     }
+    open_drawer();
+    sleep 1;
     for $i ( 1 .. $rc - 1 ) {
         if ( $form->{"qty_$i"} != $form->{"oldqty_$i"} ) {
             &update;


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