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

diff --git a/SL/Layout/Top.pm b/SL/Layout/Top.pm
index f007e09cb..53a8de794 100644
--- a/SL/Layout/Top.pm
+++ b/SL/Layout/Top.pm
@@ -6,16 +6,22 @@ use parent qw(SL::Layout::Base);
 sub pre_content {
   my ($self) = @_;
 
-  $self->SUPER::render('menu/header', { partial => 1, no_output => 1 },
-                now        => DateTime->now_local,
-                is_fastcgi => scalar($::dispatcher->interface_type =~ /fastcgi/i),
-                is_links   => scalar($ENV{HTTP_USER_AGENT}         =~ /links/i));
+  $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),
+  );
 }
 
 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__
@@ -24,7 +30,7 @@ __END__
 
 =head1 NAME
 
-SL::Layout::Top - Top line in classic and v4 menu.
+SL::Layout::Top - Top line in classic and v3 menu.
 
 =head1 DOM MODEL