X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/343ccc1ccca150c9bd4e9b59d8bde73297da3aba..15b67fd51a4e9d274205f59a9f50c4ce86b5e176:/SL/Layout/V3.pm

diff --git a/SL/Layout/V3.pm b/SL/Layout/V3.pm
index ab50ef1ae..8bf270f0b 100644
--- a/SL/Layout/V3.pm
+++ b/SL/Layout/V3.pm
@@ -2,24 +2,17 @@ package SL::Layout::V3;
 
 use strict;
 use parent qw(SL::Layout::Base);
-use SL::Layout::Css;
 
-use URI;
+use SL::Layout::None;
+use SL::Layout::Top;
+use SL::Layout::CssMenu;
 
 sub init_sub_layouts {
-  [ SL::Layout::None->new ]
-}
-
-sub use_stylesheet {
-  my $self = shift;
-  qw(
-    frame_header/header.css
-  ),
-  $self->SUPER::use_stylesheet(@_);
-}
-
-sub pre_content {
-  &render;
+  [
+    SL::Layout::None->new,
+    SL::Layout::Top->new,
+    SL::Layout::CssMenu->new,
+  ]
 }
 
 sub start_content {
@@ -30,19 +23,4 @@ sub end_content {
   "</div>\n";
 }
 
-sub render {
-  my ($self) = @_;
-
-  my $callback            = $::form->unescape($::form->{callback});
-  $callback               = URI->new($callback)->rel($callback) if $callback;
-  $callback               = "login.pl?action=company_logo"      if $callback =~ /^(\.\/)?$/;
-
-  $self->SUPER::render('menu/menuv3', { no_menu => 1, no_output => 1 },
-    force_ul_width => 1,
-    date           => $self->clock_line,
-    menu           => $self->print_menu,
-    callback       => $callback,
-  );
-}
-
 1;