]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/common.pl
Einkaufs-, Verkaufs-, Debitoren- und Kreditorenrechnungen können als Entwurf gespeich...
[mfinanz.git] / bin / mozilla / common.pl
index 86f797bb5b45787fd3fe5936856cc28d64f893f5..1c4719aaf82eba1c5a20904f9e607621709cfa51 100644 (file)
@@ -38,7 +38,8 @@ sub restore_form {
   $old_form =~ s|!r|\r|g;
   $old_form =~ s|!n|\n|g;
   $old_form =~ s|!!|!|g;
-  $form = YAML::Load($old_form);
+  my $new_form = YAML::Load($old_form);
+  map({ $form->{$_} = $new_form->{$_}; } keys(%{$new_form}));
 
   $lxdebug->leave_sub();
 }