SL/Layout/Dispatcher.pm

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