From 1b95831af24aa5f3bc731c5e89778f3a4ed04082 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 26 Feb 2008 15:54:07 +0000
Subject: [PATCH] =?utf8?q?Verhindern,=20dass=20Lieferadressen=20bei=20Lief?=
 =?utf8?q?eranten=20gel=C3=B6scht=20werden,=20wenn=20der=20Lieferant=20ges?=
 =?utf8?q?peichert=20wird.=20Ansonsten=20gehen=20bei=20jedem=20Speichern?=
 =?utf8?q?=20alle=20Lieferadressen=20verloren.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 SL/CT.pm | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/SL/CT.pm b/SL/CT.pm
index 96b6b9cb3..459a4573d 100644
--- a/SL/CT.pm
+++ b/SL/CT.pm
@@ -470,11 +470,7 @@ sub save_vendor {
 
   my $query;
 
-  if ( $form->{id} ) {
-    $query = qq|DELETE FROM shipto WHERE (trans_id = ?) AND (module = 'CT')|;
-    do_query($form, $dbh, $query, $form->{id});
-
-  } else {
+  if (!$form->{id}) {
     $query = qq|SELECT nextval('id')|;
     ($form->{id}) = selectrow_query($form, $dbh, $query);
 
-- 
2.20.1