rt/lib/RT/Interface/Web/Standalone.pm

   1 package RT::Interface::Web::Standalone;
   2
   3 use strict;
   4 use base 'HTTP::Server::Simple::Mason';
   5 use RT::Interface::Web::Handler;
   6 use RT::Interface::Web;
   7
   8 sub handler_class { "RT::Interface::Web::Handler" }
   9
  10 sub setup_escapes {
  11     my $self = shift;
  12     my $handler = shift;
  13
  14     # Override HTTP::Server::Simple::Mason's version of this method to do
  15     # nothing.  (RT::Interface::Web::Handler does this already for us in
  16     # NewHandler.)
  17 }
  18
  19 sub default_mason_config {
  20     return @RT::MasonParameters;
  21 }
  22
  23 sub handle_request {
  24
  25     my $self = shift;
  26     my $cgi = shift;
  27
  28     Module::Refresh->refresh if $RT::DevelMode;
  29
  30     $self->SUPER::handle_request($cgi);
  31     $RT::Logger->crit($@) if ($@);
  32
  33     RT::Interface::Web::Handler->CleanupRequest();
  34
  35 }
  36
  37 1;