SF.net SVN: ledger-smb:[6399] trunk

[..hidden..]

Revision: 6399
          http://sourceforge.net/p/ledger-smb/code/6399
Author:   einhverfr
Date:     2014-01-06 07:16:07 +0000 (Mon, 06 Jan 2014)
Log Message:
-----------
Removed spurious commits from bin/ and everything still seems to work.

Modified Paths:
--------------
    trunk/bin/aa.pl
    trunk/bin/gl.pl
    trunk/bin/io.pl
    trunk/bin/ir.pl
    trunk/old-handler.pl

Modified: trunk/bin/aa.pl
===================================================================
--- trunk/bin/aa.pl	2014-01-06 06:52:35 UTC (rev 6398)
+++ trunk/bin/aa.pl	2014-01-06 07:16:07 UTC (rev 6399)
@@ -170,7 +170,6 @@
     $form->{format} = $form->get_setting('format') unless $form->{format};
     $form->close_form;
     $form->open_form;
-    $form->{dbh}->commit;
     AA->get_files($form, $locale);
     &form_header;
     &form_footer;

Modified: trunk/bin/gl.pl
===================================================================
--- trunk/bin/gl.pl	2014-01-06 06:52:35 UTC (rev 6398)
+++ trunk/bin/gl.pl	2014-01-06 07:16:07 UTC (rev 6399)
@@ -186,7 +186,6 @@
          unless $form->{id};
     $form->close_form;
     $form->open_form; 
-    $form->{dbh}->commit;
     my ($init) = @_; 
     # Form header part begins -------------------------------------------
     if (@{$form->{all_department}}){

Modified: trunk/bin/io.pl
===================================================================
--- trunk/bin/io.pl	2014-01-06 06:52:35 UTC (rev 6398)
+++ trunk/bin/io.pl	2014-01-06 07:16:07 UTC (rev 6399)
@@ -903,7 +903,6 @@
 sub display_form {
     $form->close_form();
     $form->open_form();
-    $form->{dbh}->commit;
 
     # if we have a display_form
     if ( $form->{display_form} ) {

Modified: trunk/bin/ir.pl
===================================================================
--- trunk/bin/ir.pl	2014-01-06 06:52:35 UTC (rev 6398)
+++ trunk/bin/ir.pl	2014-01-06 07:16:07 UTC (rev 6399)
@@ -1456,12 +1456,10 @@
                 if($form->{"taxformcheck_$i"})
 		{
 		  IR->update_invoice_tax_form($form,$form->{dbh},$form->{"invoice_id_$i"},"true") if($form->{"invoice_id_$i"});
-          $form->{$dbh}->commit();#highest-level sub should commit
 		}
 		else
 		{
 		    IR->update_invoice_tax_form($form,$form->{dbh},$form->{"invoice_id_$i"},"false") if($form->{"invoice_id_$i"});
-            $form->{$dbh}->commit();#highest-level sub should commit
 		}
                 }#taxformfound		
 	    }

Modified: trunk/old-handler.pl
===================================================================
--- trunk/old-handler.pl	2014-01-06 06:52:35 UTC (rev 6398)
+++ trunk/old-handler.pl	2014-01-06 07:16:07 UTC (rev 6399)
@@ -225,6 +225,8 @@
 
 1;
 
+$form->{dbh}->commit if defined $form->{dbh};
+
 $form->{dbh}->disconnect()
     if defined $form->{dbh};
 

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


------------------------------------------------------------------------------
Rapidly troubleshoot problems before they affect your business. Most IT 
organizations don't have a clear picture of how application performance 
affects their revenue. With AppDynamics, you get 100% visibility into your 
Java,.NET, & PHP application. Start your 15-day FREE TRIAL of AppDynamics Pro!
http://pubads.g.doubleclick.net/gampad/clk?id=84349831&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits