X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/cd73950c9f7616255cf917e36a6e1a03627f860d..refs/heads/order_controller:/SL/Layout/Top.pm diff --git a/SL/Layout/Top.pm b/SL/Layout/Top.pm index a838aeee1..e2e5d2df6 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 => $::dispatcher ? scalar($::dispatcher->interface_type =~ /fastcgi/i) : 0, + is_links => scalar($ENV{HTTP_USER_AGENT} =~ /links/i), + ); } sub stylesheets { 'frame_header/header.css'; } +sub javascripts { + ('jquery-ui.js', 'quicksearch_input.js') x!! $::auth->assert('customer_vendor_edit', 1), + ('jquery-ui.js', 'glquicksearch.js') x!! $::auth->assert('general_ledger', 1) +} + 1; __END__