From 7e073dcdadf65ee98b683b7dd6461fb6fb69a039 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 12 Feb 2007 12:08:47 +0000
Subject: [PATCH] Debugmeldungen...

---
 bin/mozilla/io.pl | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index e7e8b1337..9a1e3ab72 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -981,10 +981,8 @@ sub check_form {
 
   # remove any makes or model rows
   if ($form->{item} eq 'part') {
-    $lxdebug->message(0, "a1 $form->{sellprice}");
     map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) }
       qw(listprice sellprice lastcost weight rop);
-    $lxdebug->message(0, "a2 $form->{sellprice}");
 
     @flds = (make, model);
     for my $i (1 .. ($form->{makemodel_rows})) {
@@ -997,9 +995,7 @@ sub check_form {
       }
     }
 
-    $lxdebug->message(0, "a3 $form->{sellprice}");
     $form->redo_rows(\@flds, \@a, $count, $form->{makemodel_rows});
-    $lxdebug->message(0, "a4 $form->{sellprice}");
     $form->{makemodel_rows} = $count;
 
   } elsif ($form->{item} eq 'assembly') {
@@ -1080,7 +1076,6 @@ sub check_form {
     }
   }
 
-    $lxdebug->message(0, "a5 $form->{sellprice}");
   #sk
   # if pricegroups
   if (   $form->{type} =~ (/sales_quotation/)
@@ -1095,10 +1090,8 @@ sub check_form {
     set_pricegroup($form->{rowcount});
 
   }
-    $lxdebug->message(0, "a6 $form->{sellprice}");
 
   &display_form;
-    $lxdebug->message(0, "a7 $form->{sellprice}");
 
   $lxdebug->leave_sub();
 }
-- 
2.20.1