X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8084ef359515031ec8429b49baf0ab09858f55d2..8add0ccd27ab0ff17256b74dccd1f761c0d09182:/SL/IS.pm?ds=inline

diff --git a/SL/IS.pm b/SL/IS.pm
index da801fd52..d90a0d0db 100644
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1478,6 +1478,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");