Fix für Bug 1770 - Währung / currency überlebt Workflow über Lieferschein nicht

[mfinanz.git] / SL / Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 38d87ad01a22f81a9ba102cd2f8de923b994961d..9433173c6f5c0e01bca5021d2f5980b560cb6ca1 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -2860,7 +2860,7 @@ sub create_links {
     if ($self->{"$self->{vc}_id"}) {
 
       # only setup currency
-      ($self->{currency}) = split(/:/, $self->{currencies});
+      ($self->{currency}) = split(/:/, $self->{currencies}) if !$self->{currency};
 
     } else {