From 24fa7eca64770b4c2fe9690ba88d77d9ba1f1b75 Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 2 Nov 2006 22:16:58 +0000
Subject: Stop add_transaction from adding dbh to paramater list used by
 $form->redirect

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@468 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/arap.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/arap.pl b/bin/arap.pl
index 3f65d4ff..e210d0d8 100755
--- a/bin/arap.pl
+++ b/bin/arap.pl
@@ -282,7 +282,7 @@ sub add_transaction {
 
   $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";
 
-- 
cgit v1.2.3