From a5a7ff06d7ed7396e2efbe778c961e2784cb771b Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Mon, 5 Oct 2009 17:02:20 +0200
Subject: [PATCH] =?utf8?q?Bei=20Kunden=20die=20Validit=C3=A4t=20nicht=20sp?=
 =?utf8?q?eichern.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Fix für Bug 1191
---
 SL/CT.pm   | 6 ++++--
 SL/CVar.pm | 8 +++++---
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/SL/CT.pm b/SL/CT.pm
index 2397fe7d5..80916ad58 100644
--- a/SL/CT.pm
+++ b/SL/CT.pm
@@ -446,7 +446,8 @@ sub save_customer {
   CVar->save_custom_variables('dbh'       => $dbh,
                               'module'    => 'CT',
                               'trans_id'  => $form->{id},
-                              'variables' => $form);
+                              'variables' => $form,
+                              'always_valid' => 1);
 
   $rc = $dbh->commit();
   $dbh->disconnect();
@@ -651,7 +652,8 @@ sub save_vendor {
   CVar->save_custom_variables('dbh'       => $dbh,
                               'module'    => 'CT',
                               'trans_id'  => $form->{id},
-                              'variables' => $form);
+                              'variables' => $form,
+                              'always_valid' => 1);
 
   $rc = $dbh->commit();
   $dbh->disconnect();
diff --git a/SL/CVar.pm b/SL/CVar.pm
index d50f2fa13..a55cdf439 100644
--- a/SL/CVar.pm
+++ b/SL/CVar.pm
@@ -334,9 +334,11 @@ sub save_custom_variables {
 
     do_statement($form, $sth, $query, @values);
 
-    $self->save_custom_variables_validity(trans_id => $params{trans_id}, config_id => $config->{id},
-      validity => ($params{variables}->{"$params{name_prefix}cvar_$config->{name}$params{name_postfix}_valid"} ? 1 : 0)
-    );
+    unless ($params{always_valid}) {
+      $self->save_custom_variables_validity(trans_id => $params{trans_id}, config_id => $config->{id},
+        validity => ($params{variables}->{"$params{name_prefix}cvar_$config->{name}$params{name_postfix}_valid"} ? 1 : 0)
+      );
+    };
   }
 
   $sth->finish();
-- 
2.20.1