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

[..hidden..]

Revision: 607
          http://svn.sourceforge.net/ledger-smb/?rev=607&view=rev
Author:   einhverfr
Date:     2006-11-14 16:54:17 -0800 (Tue, 14 Nov 2006)

Log Message:
-----------
Fixing parts handling so if part is not saved we display error.

Modified Paths:
--------------
    trunk/LedgerSMB/GL.pm
    trunk/bin/ic.pl

Modified: trunk/LedgerSMB/GL.pm
===================================================================
--- trunk/LedgerSMB/GL.pm	2006-11-15 00:22:44 UTC (rev 606)
+++ trunk/LedgerSMB/GL.pm	2006-11-15 00:54:17 UTC (rev 607)
@@ -202,7 +202,6 @@
 
 	# commit and redirect
 	my $rc = $dbh->commit;
-	$dbh->disconnect;
 
 	$rc;
 }

Modified: trunk/bin/ic.pl
===================================================================
--- trunk/bin/ic.pl	2006-11-15 00:22:44 UTC (rev 606)
+++ trunk/bin/ic.pl	2006-11-15 00:54:17 UTC (rev 607)
@@ -3013,8 +3013,12 @@
     $form->{callback} = $callback;
   }
 
-  # redirect
-  $form->redirect;
+  if ($rc){
+    # redirect
+    $form->redirect("Part Saved");
+  } else {
+    $form->error;
+  }
 
 }
 


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