X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/aa8ce6f54620ff173158c259bd5430eb8e2bdb67..ee9fb352c2d675dfe828e5f672d857b827e003ed:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 65fdaced1..caace43f6 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1596,8 +1596,8 @@ $main::lxdebug->enter_sub();
   $key = "all_currencies" unless ($key);
 
   my $query = qq|SELECT curr AS currency FROM defaults|;
-
-  $self->{$key} = selectall_hashref_query($self, $dbh, $query);
+ 
+  $self->{$key} = [split(/\:/ , selectfirst_hashref_query($self, $dbh, $query)->{currency})];
 
   $main::lxdebug->leave_sub();
 }