diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-02 22:16:58 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-02 22:16:58 +0000 |
| commit | 24fa7eca64770b4c2fe9690ba88d77d9ba1f1b75 (patch) | |
| tree | d2efc9bf5df303adc51cab658f0de1b924cf2420 /bin | |
| parent | 32b462624ee896035274c293fe637aac98141a2c (diff) | |
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
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/arap.pl | 2 |
1 files changed, 1 insertions, 1 deletions
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"; |