From c17e4e545f025e4f2c6e4c28c88da1cd180a3d7a Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 12 Jan 2011 16:37:26 +0100
Subject: [PATCH] API-Umstellung auf Hash-Parameter

Conflicts:

	SL/Controller/SalesProcess.pm
---
 SL/DB/Helper/FlattenToForm.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm
index a09c75c0a..beaaa051c 100644
--- a/SL/DB/Helper/FlattenToForm.pm
+++ b/SL/DB/Helper/FlattenToForm.pm
@@ -10,7 +10,7 @@ use List::MoreUtils qw(any);
 use SL::CVar;
 
 sub flatten_to_form {
-  my ($self, $form, $format_amounts) = @_;
+  my ($self, $form, %params) = @_;
 
   my $vc = $self->can('customer_id') && $self->customer_id ? 'customer' : 'vendor';
 
@@ -49,6 +49,7 @@ sub flatten_to_form {
   $form->{rowcount}   = scalar(@{ $self->items });
 
   my $idx = 0;
+  my $format_amounts = $params{format_amounts};
   foreach my $item (@{ $self->items }) {
     next if _has($item, 'assemblyitem');
 
-- 
2.20.1