SF.net SVN: ledger-smb:[6564] branches/1.3

[..hidden..]

Revision: 6564
          http://sourceforge.net/p/ledger-smb/code/6564
Author:   einhverfr
Date:     2014-01-21 04:00:09 +0000 (Tue, 21 Jan 2014)
Log Message:
-----------
Fixing bug 961 (tested fix on 1.3 since other issues with trunk preventing it)

Modified Paths:
--------------
    branches/1.3/LedgerSMB/IS.pm
    branches/1.3/bin/io.pl
    branches/1.3/bin/ir.pl
    branches/1.3/bin/is.pl
    branches/1.3/bin/oe.pl

Modified: branches/1.3/LedgerSMB/IS.pm
===================================================================
--- branches/1.3/LedgerSMB/IS.pm	2014-01-21 03:32:00 UTC (rev 6563)
+++ branches/1.3/LedgerSMB/IS.pm	2014-01-21 04:00:09 UTC (rev 6564)
@@ -1622,7 +1622,6 @@
         $form->{crdate},	$form->{id}
     ) || $form->dberror($query);
 
-    $form->error($form->{id});
     # add shipto
     $form->{name} = $form->{customer};
     $form->{name} =~ s/--$form->{customer_id}//;

Modified: branches/1.3/bin/io.pl
===================================================================
--- branches/1.3/bin/io.pl	2014-01-21 03:32:00 UTC (rev 6563)
+++ branches/1.3/bin/io.pl	2014-01-21 04:00:09 UTC (rev 6564)
@@ -1053,7 +1053,7 @@
 
         }
     }
-
+    return if $form->{action} =~ /(save|post)/;
     &display_form;
 
 }

Modified: branches/1.3/bin/ir.pl
===================================================================
--- branches/1.3/bin/ir.pl	2014-01-21 03:32:00 UTC (rev 6563)
+++ branches/1.3/bin/ir.pl	2014-01-21 04:00:09 UTC (rev 6564)
@@ -1315,6 +1315,7 @@
         &update;
         $form->finalize_request();
     }
+    check_form();
 
     &validate_items;
 

Modified: branches/1.3/bin/is.pl
===================================================================
--- branches/1.3/bin/is.pl	2014-01-21 03:32:00 UTC (rev 6563)
+++ branches/1.3/bin/is.pl	2014-01-21 04:00:09 UTC (rev 6564)
@@ -1373,7 +1373,7 @@
         &update;
         $form->finalize_request();
     }
-
+    check_form();
     &validate_items;
 
     $closedto  = $form->datetonum( \%myconfig, $form->{closedto} );

Modified: branches/1.3/bin/oe.pl
===================================================================
--- branches/1.3/bin/oe.pl	2014-01-21 03:32:00 UTC (rev 6563)
+++ branches/1.3/bin/oe.pl	2014-01-21 04:00:09 UTC (rev 6564)
@@ -2265,6 +2265,7 @@
     $form->isblank( "exchangerate", $locale->text('Exchange rate missing!') )
       if ( $form->{currency} ne $form->{defaultcurrency} );
 
+    check_form();
     &validate_items;
 
 

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


------------------------------------------------------------------------------
CenturyLink Cloud: The Leader in Enterprise Cloud Services.
Learn Why More Businesses Are Choosing CenturyLink Cloud For
Critical Workloads, Development Environments & Everything In Between.
Get a Quote or Start a Free Trial Today. 
http://pubads.g.doubleclick.net/gampad/clk?id=119420431&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits