X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/cd73950c9f7616255cf917e36a6e1a03627f860d..68dbf4a4cb26b9554a23f076438109d7fc2d861c:/SL/Layout/Top.pm

diff --git a/SL/Layout/Top.pm b/SL/Layout/Top.pm
index a838aeee1..53a8de794 100644
--- a/SL/Layout/Top.pm
+++ b/SL/Layout/Top.pm
@@ -7,15 +7,21 @@ sub pre_content {
   my ($self) = @_;
 
   $self->presenter->render('menu/header',
-                now        => DateTime->now_local,
-                is_fastcgi => scalar($::dispatcher->interface_type =~ /fastcgi/i),
-                is_links   => scalar($ENV{HTTP_USER_AGENT}         =~ /links/i));
+    now        => DateTime->now_local,
+    is_fastcgi => scalar($::dispatcher->interface_type =~ /fastcgi/i),
+    is_links   => scalar($ENV{HTTP_USER_AGENT}         =~ /links/i),
+  );
 }
 
 sub stylesheets {
  'frame_header/header.css';
 }
 
+sub javascripts {
+  ('js/quicksearch_input.js') x!! $::auth->assert('customer_vendor_edit', 1),
+  ('js/glquicksearch.js')     x!! $::auth->assert('general_ledger', 1)
+}
+
 1;
 
 __END__