SL/Controller/Layout.pm

   1 package SL::Controller::Layout;
   2
   3 use strict;
   4 use parent qw(SL::Controller::Base);
   5
   6 use SL::Menu;
   7 use SL::Controller::Layout::Admin;
   8 use SL::Controller::Layout::Login;
   9 use SL::Controller::Layout::Classic;
  10 use SL::Controller::Layout::V3;
  11 use SL::Controller::Layout::V4;
  12 use SL::Controller::Layout::Javascript;
  13
  14 my %menu_cache;
  15
  16 sub new {
  17   my ($class, %params) = @_;
  18
  19   return SL::Controller::Layout::Classic->new    if $params{style} eq 'old';
  20   return SL::Controller::Layout::V3->new         if $params{style} eq 'v3';
  21   return SL::Controller::Layout::V4->new         if $params{style} eq 'v4';
  22   return SL::Controller::Layout::Javascript->new if $params{style} eq 'neu';
  23   return SL::Controller::Layout::Admin->new      if $params{style} eq 'admin';
  24   return SL::Controller::Layout::Login->new      if $params{style} eq 'login';
  25   return SL::Controller::Layout::None->new;
  26 }
  27
  28 1;