From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 6 May 2009 08:33:58 +0000 (+0000)
Subject: Variablen zwischenspeichern und wiederherstellen, sofern sie existieren, auch wenn... 
X-Git-Tag: release-2.6.0beta2~34
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=17a8e2bbdba1c715abdb106a0819cf913cdf6fb6;p=kivitendo-erp.git

Variablen zwischenspeichern und wiederherstellen, sofern sie existieren, auch wenn sie undefiniert sind. Bugfix für diesen Fall: Angebot mit einem Kunden, der beim Kunden eine Sprache hinterlegt hat. Angebot hat explizit keine Sprache ausgewählt und wurde gespeichert. Wenn man das Angebot aufruft, wurde ohne diese Änderung nun wieder die beim Kunden hinterlegte Sprache ausgewählt.

Bugfix für 744.
---

diff --git a/SL/Form.pm b/SL/Form.pm
index 525d7329e..2d4d5e432 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -3383,7 +3383,7 @@ sub backup_vars {
   my $self = shift;
   my @vars = @_;
 
-  map { $self->{_VAR_BACKUP}->{$_} = $self->{$_} if $self->{$_} } @vars;
+  map { $self->{_VAR_BACKUP}->{$_} = $self->{$_} if exists $self->{$_} } @vars;
 
   $main::lxdebug->leave_sub();
 }
@@ -3394,7 +3394,7 @@ sub restore_vars {
   my $self = shift;
   my @vars = @_;
 
-  map { $self->{$_} = $self->{_VAR_BACKUP}->{$_} if $self->{_VAR_BACKUP}->{$_} } @vars;
+  map { $self->{$_} = $self->{_VAR_BACKUP}->{$_} if exists $self->{_VAR_BACKUP}->{$_} } @vars;
 
   $main::lxdebug->leave_sub();
 }