From ba5890bd2f14e916e47f17a79af49392487dbeb0 Mon Sep 17 00:00:00 2001 From: einhverfr Date: Fri, 10 Oct 2008 15:35:29 +0000 Subject: merging in fix for OE generation git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2361 4979c152-3d1c-0410-bac9-87ea11338e46 --- bin/pe.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'bin') diff --git a/bin/pe.pl b/bin/pe.pl index f1c11d35..3e9dea04 100644 --- a/bin/pe.pl +++ b/bin/pe.pl @@ -2891,8 +2891,8 @@ sub generate_sales_orders { } $order = new Form; - $order->{dbh} = $form->{dbh}; for ( keys %{ $form->{order} } ) { + $order->{dbh} = $form->{dbh}; for (qw(type vc defaultcurrency login)) { $order->{$_} = $form->{$_} } for ( split / /, $form->{taxaccounts} ) { -- cgit v1.2.3