projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Perl-DB-Upgradescripte: nicht manuell Datenbankhandle committen
[kivitendo-erp.git]
/
SL
/
Layout
/
V3.pm
diff --git
a/SL/Layout/V3.pm
b/SL/Layout/V3.pm
index
9d5e37d
..
f37eea4
100644
(file)
--- a/
SL/Layout/V3.pm
+++ b/
SL/Layout/V3.pm
@@
-132,7
+132,7
@@
sub init_sub_layouts {
sub use_stylesheet {
my $self = shift;
qw(
sub use_stylesheet {
my $self = shift;
qw(
- frame_header/header.css
+
icons16.css
frame_header/header.css
),
$self->SUPER::use_stylesheet(@_);
}
),
$self->SUPER::use_stylesheet(@_);
}
@@
-146,7
+146,7
@@
sub use_javascript {
}
sub pre_content {
}
sub pre_content {
-
&
render;
+
$_[0]->
render;
}
sub start_content {
}
sub start_content {
@@
-164,7
+164,7
@@
sub render {
$callback = URI->new($callback)->rel($callback) if $callback;
$callback = "login.pl?action=company_logo" if $callback =~ /^(\.\/)?$/;
$callback = URI->new($callback)->rel($callback) if $callback;
$callback = "login.pl?action=company_logo" if $callback =~ /^(\.\/)?$/;
- $self->
SUPER::render('menu/menuv3', { output => 0 }
,
+ $self->
presenter->render('menu/menuv3'
,
force_ul_width => 1,
date => $self->clock_line,
menu => $self->print_menu,
force_ul_width => 1,
date => $self->clock_line,
menu => $self->print_menu,