From: Sven Schöling <s.schoeling@linet-services.de>
Date: Tue, 16 Jun 2009 10:30:31 +0000 (+0000)
Subject: Bugfix: Kreditorenbuchungen Bemerkungen gingen beim Update verloren.
X-Git-Tag: release-2.6.1beta1~397
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=029d99552b546fdf92fba88cdbc279b723e4f3d1;p=kivitendo-erp.git

Bugfix: Kreditorenbuchungen Bemerkungen gingen beim Update verloren.
---

diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl
index 39db0fe22..33d2eee3f 100644
--- a/bin/mozilla/ap.pl
+++ b/bin/mozilla/ap.pl
@@ -893,7 +893,7 @@ sub update {
   $form->{invdate} = $form->{transdate};
   my %saved_variables = map +( $_ => $form->{$_} ), qw(AP AP_amount_1 taxchart_1);
 
-  &check_name("vendor");
+  my $vendor_changed = &check_name("vendor");
 
   $form->{AP} = $saved_variables{AP};
   if ($saved_variables{AP_amount_1} =~ m/.--./) {
@@ -928,7 +928,7 @@ sub update {
   $form->{oldtotalpaid} = $totalpaid;
 
   # notes
-  $form->{notes} = $form->{intnotes};
+  $form->{notes} = $form->{intnotes} if $vendor_changed;
 
   &display_form;