From 1cd8764aa91e783e0884f9caf5d9b72ffff37a34 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 10 Jan 2007 15:41:47 +0000
Subject: [PATCH] =?utf8?q?Artikel=20"Als=20neu=20speichern":=20Es=20wird?=
 =?utf8?q?=20nur=20dann=20automatisch=20eine=20neue=20Artikelnummer=20verg?=
 =?utf8?q?eben,=20wenn=20die=20Artikelnummer=20nicht=20manuell=20ver=C3=A4?=
 =?utf8?q?ndert=20wurde.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 bin/mozilla/ic.pl | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index a6237fab3..63ce108ca 100644
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -2071,6 +2071,8 @@ sub edit {
 
   IC->get_part(\%myconfig, \%$form);
 
+  $form->{"original_partnumber"} = $form->{"partnumber"};
+
   $form->{title} = $locale->text('Edit ' . ucfirst $form->{item});
 
   &link_part;
@@ -2561,6 +2563,7 @@ sub form_header {
 <input name=rowcount type=hidden value=$form->{rowcount}>
 <input name=eur type=hidden value=$eur>
 <input name=language_values type=hidden value="$form->{language_values}">
+<input name="original_partnumber" type="hidden" value="| . $form->quote($form->{"original_partnumber"}) . qq|">
 
 <table width="100%">
   <tr>
@@ -3189,7 +3192,10 @@ sub save_as_new {
   $lxdebug->enter_sub();
 
   $form->{id} = 0;
-  $form->{partnumber} = "";
+  if ($form->{"original_partnumber"} &&
+      ($form->{"partnumber"} eq $form->{"original_partnumber"})) {
+    $form->{partnumber} = "";
+  }
   &save;
 
   $lxdebug->leave_sub();
-- 
2.20.1