summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xbin/pe.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/pe.pl b/bin/pe.pl
index 3d4bbbb1..cccc9ba0 100755
--- 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 (qw(currency)) { $order->{$_} = $form->{$_} }