From 3ef788be3eabee838cf1f9f4a9a6051bfa847554 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Fri, 23 Oct 2009 15:10:53 +0200
Subject: [PATCH] fixes

---
 bin/mozilla/invoice_io.pl | 62 +++++++++++++++++++++------------------
 1 file changed, 33 insertions(+), 29 deletions(-)

diff --git a/bin/mozilla/invoice_io.pl b/bin/mozilla/invoice_io.pl
index 97bb8fdb8..b4290feb2 100644
--- a/bin/mozilla/invoice_io.pl
+++ b/bin/mozilla/invoice_io.pl
@@ -661,46 +661,50 @@ sub display_form {
   #   }
   &form_header;
 
-  my $numrows    = ++$form->{rowcount};
-  my $subroutine = "display_row";
+  {
+    no strict 'refs';
 
-  if ($form->{item} eq 'part') {
+    my $numrows    = ++$form->{rowcount};
+    my $subroutine = "display_row";
 
-    #set preisgruppenanzahl
-    $numrows    = $form->{price_rows};
-    $subroutine = "price_row";
+    if ($form->{item} eq 'part') {
 
-    &{$subroutine}($numrows);
+      #set preisgruppenanzahl
+      $numrows    = $form->{price_rows};
+      $subroutine = "price_row";
 
-    $numrows    = ++$form->{makemodel_rows};
-    $subroutine = "makemodel_row";
-  }
-  if ($form->{item} eq 'assembly') {
-    $numrows    = $form->{price_rows};
-    $subroutine = "price_row";
+      &{$subroutine}($numrows);
+
+      $numrows    = ++$form->{makemodel_rows};
+      $subroutine = "makemodel_row";
+    }
+    if ($form->{item} eq 'assembly') {
+      $numrows    = $form->{price_rows};
+      $subroutine = "price_row";
 
-    &{$subroutine}($numrows);
+      &{$subroutine}($numrows);
 
-    $numrows    = ++$form->{makemodel_rows};
-    $subroutine = "makemodel_row";
+      $numrows    = ++$form->{makemodel_rows};
+      $subroutine = "makemodel_row";
 
-    # create makemodel rows
-    &{$subroutine}($numrows);
+      # create makemodel rows
+      &{$subroutine}($numrows);
 
-    $numrows    = ++$form->{assembly_rows};
-    $subroutine = "assembly_row";
-  }
-  if ($form->{item} eq 'service') {
-    $numrows    = $form->{price_rows};
-    $subroutine = "price_row";
+      $numrows    = ++$form->{assembly_rows};
+      $subroutine = "assembly_row";
+    }
+    if ($form->{item} eq 'service') {
+      $numrows    = $form->{price_rows};
+      $subroutine = "price_row";
 
-    &{$subroutine}($numrows);
+      &{$subroutine}($numrows);
 
-    $numrows = 0;
-  }
+      $numrows = 0;
+    }
 
-  # create rows
-  &{$subroutine}($numrows) if $numrows;
+    # create rows
+    &{$subroutine}($numrows) if $numrows;
+  }
 
   &form_footer;
 
-- 
2.20.1