SF.net SVN: ledger-smb: [468] trunk/bin/arap.pl

[..hidden..]

Revision: 468
          http://svn.sourceforge.net/ledger-smb/?rev=468&view=rev
Author:   tetragon
Date:     2006-11-02 14:16:58 -0800 (Thu, 02 Nov 2006)

Log Message:
-----------
Stop add_transaction from adding dbh to paramater list used by $form->redirect

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

Modified: trunk/bin/arap.pl
===================================================================
--- trunk/bin/arap.pl	2006-11-02 19:40:30 UTC (rev 467)
+++ trunk/bin/arap.pl	2006-11-02 22:16:58 UTC (rev 468)
@@ -282,7 +282,7 @@
 
   $form->{callback} = $form->escape($form->{callback},1);
   $argv = "";
-  for (keys %$form) { $argv .= "$_=$form->{$_}&" }
+  for (keys %$form) { $argv .= "$_=$form->{$_}&" if $_ ne 'dbh' }
 
   $form->{callback} = "$module.pl?$argv";
 


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