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   $::form->use_stylesheet('frame_header/header.css');
  10   $self->render('menu/header', { partial => 1, no_output => 1 },
  11                 now        => DateTime->now_local,
  12                 is_fastcgi => scalar($::dispatcher->interface_type =~ /fastcgi/i),
  13                 is_links   => scalar($ENV{HTTP_USER_AGENT}         =~ /links/i));
  14 }
  15
  16 1;