X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FUser.pm;h=407f7934cf9356944568bb5355bd2a49f376fc6c;hb=015f7118b8398596eb3656a343b5cf0141929fb7;hp=a50ca969804d812c5462e8b20dff806bd9dbadb8;hpb=b8da8785c1b6d313518202acb307adfb50ebdb65;p=kivitendo-erp.git

diff --git a/SL/User.pm b/SL/User.pm
index a50ca9698..407f7934c 100644
--- a/SL/User.pm
+++ b/SL/User.pm
@@ -34,7 +34,7 @@
 
 package User;
 
-use strict;
+#use strict;
 
 use IO::File;
 use Fcntl qw(:seek);
@@ -173,6 +173,7 @@ sub login {
       my $menufile =
         $self->{"menustyle"} eq "v3" ? "menuv3.pl" :
         $self->{"menustyle"} eq "neu" ? "menunew.pl" :
+        $self->{"menustyle"} eq "js" ? "menujs.pl" :
         $self->{"menustyle"} eq "xml" ? "menuXML.pl" :
         "menu.pl";
 
@@ -553,6 +554,12 @@ sub process_query {
         $query .= $char;
       }
     }
+
+    # Insert a space at the end of each line so that queries split
+    # over multiple lines work properly.
+    if ($query ne '') {
+      $query .= @quote_chars ? "\n" : ' ';
+    }
   }
 
   if (ref($version_or_control) eq "HASH") {