|
package SL::Layout::Javascript;
|
|
|
|
use strict;
|
|
use parent qw(SL::Layout::Base);
|
|
|
|
use List::Util qw(max);
|
|
use URI;
|
|
|
|
sub init_sub_layouts {
|
|
[
|
|
SL::Layout::None->new,
|
|
SL::Layout::Top->new,
|
|
]
|
|
}
|
|
|
|
sub use_javascript {
|
|
my $self = shift;
|
|
qw(
|
|
js/dhtmlsuite/menu-for-applications.js
|
|
),
|
|
$self->SUPER::use_javascript(@_);
|
|
}
|
|
|
|
sub javascripts_inline {
|
|
$_[0]->SUPER::javascripts_inline,
|
|
<<'EOJS'
|
|
DHTMLSuite.createStandardObjects();
|
|
DHTMLSuite.configObj.setImagePath('image/dhtmlsuite/');
|
|
var menu_model = new DHTMLSuite.menuModel();
|
|
menu_model.addItemsFromMarkup('main_menu_model');
|
|
menu_model.init();
|
|
var menu_bar = new DHTMLSuite.menuBar();
|
|
menu_bar.addMenuItems(menu_model);
|
|
menu_bar.setTarget('main_menu_div');
|
|
menu_bar.init();
|
|
EOJS
|
|
}
|
|
|
|
sub pre_content {
|
|
$_[0]->SUPER::pre_content .
|
|
$_[0]->presenter->render("menu/menunew",
|
|
force_ul_width => 1,
|
|
menu => $_[0]->menu,
|
|
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 {
|
|
"<div id='content'>\n";
|
|
}
|
|
|
|
sub end_content {
|
|
"</div>\n";
|
|
}
|
|
|
|
sub stylesheets {
|
|
$_[0]->add_stylesheets(qw(
|
|
dhtmlsuite/menu-item.css
|
|
dhtmlsuite/menu-bar.css
|
|
icons16.css
|
|
menu.css
|
|
));
|
|
$_[0]->SUPER::stylesheets;
|
|
}
|
|
|
|
1;
|