PriceRule: Korrektes Matching von Nulls

[kivitendo-erp.git] / SL / Layout / Top.pm

diff --git a/SL/Layout/Top.pm b/SL/Layout/Top.pm
index f007e09..165134d 100644 (file)
--- 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 => $::dispatcher ? 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