X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b251cc22f355941217493073e124ba3878d5530f..dd1ab30b7c2a6bec318dd75100e54c9bfa400e77:/SL/Layout/Javascript.pm diff --git a/SL/Layout/Javascript.pm b/SL/Layout/Javascript.pm index 366e0d7c9..76728ef91 100644 --- a/SL/Layout/Javascript.pm +++ b/SL/Layout/Javascript.pm @@ -3,6 +3,10 @@ package SL::Layout::Javascript; use strict; use parent qw(SL::Layout::Base); +use SL::Layout::None; +use SL::Layout::Top; +use SL::Layout::Content; + use List::Util qw(max); use URI; @@ -10,6 +14,7 @@ sub init_sub_layouts { [ SL::Layout::None->new, SL::Layout::Top->new, + SL::Layout::Content->new, ] } @@ -41,25 +46,16 @@ sub pre_content { $_[0]->presenter->render("menu/menunew", force_ul_width => 1, menu => $_[0]->menu, - icon_path => sub { my $img = "image/icons/16x16/$_[0].png"; -f $img ? $img : () }, + icon_path => sub { my $simg = "image/icons/svg/$_[0].svg"; my $pimg="image/icons/16x16/$_[0].png"; -f $simg ? $simg : ( -f $pimg ? $pimg : ()) }, max_width => sub { 10 * max map { length $::locale->text($_->{name}) } @{ $_[0]{children} || [] } }, ); } -sub start_content { - "
\n"; -} - -sub end_content { - "
\n"; -} - sub stylesheets { $_[0]->add_stylesheets(qw( dhtmlsuite/menu-item.css dhtmlsuite/menu-bar.css icons16.css - frame_header/header.css menu.css )); $_[0]->SUPER::stylesheets;