X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FOE.pm;h=72c11ed3249d38f7e14d9490d98c4d81889337d2;hb=e411fd61f5174cd315a083226bb5e2e071a2caf4;hp=2e0ac4212a40773e6b379291ca24b19db5437393;hpb=a53233e56a9d4001b47bcf412b4bfe46910d3117;p=kivitendo-erp.git

diff --git a/SL/OE.pm b/SL/OE.pm
index 2e0ac4212..72c11ed32 100644
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -620,7 +620,7 @@ sub retrieve {
   my $ref = selectfirst_hashref_query($form, $dbh, $query);
   map { $form->{$_} = $ref->{$_} } keys %$ref;
 
-  ($form->{currency}) = split(/:/, $form->{currencies});
+  ($form->{currency}) = split(/:/, $form->{currencies}) unless ($form->{currency});
 
   # set reqdate if this is an invoice->order conversion. If someone knows a better check to ensure
   # we come from invoices, feel free.