SL/Controller/FrameHeader.pm

   1 package SL::Controller::FrameHeader;
   2
   3 use strict;
   4 use parent qw(SL::Controller::Base);
   5
   6 sub action_header {
   7   my ($self) = @_;
   8
   9   delete $::form->{stylesheet};
  10   $::form->use_stylesheet('frame_header/header.css');
  11   $self->render('menu/header',
  12                 now        => DateTime->now_local,
  13                 is_fastcgi => scalar($::dispatcher->interface_type =~ /fastcgi/i),
  14                 is_links   => scalar($ENV{HTTP_USER_AGENT}         =~ /links/i));
  15 }
  16
  17 1;