Merge branch 'master' of vc.linet-services.de:public/lx-office-erp

[mfinanz.git] / SL / IS.pm

diff --git a/SL/IS.pm b/SL/IS.pm
index bd385ef7d2354606e25eb80f992f4331545fbef3..c9a44281d84f0aa95e511e6e108b7078017f9297 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1480,6 +1480,8 @@ sub retrieve_invoice {
     $ref = selectfirst_hashref_query($form, $dbh, $query, $id);
     map { $form->{$_} = $ref->{$_} } keys %{ $ref };
 
+    # remove any trailing whitespace
+    $form->{currency} =~ s/\s*$//;
 
     $form->{exchangerate} = $form->get_exchangerate($dbh, $form->{currency}, $form->{invdate}, "buy");