changed error code constant, and related test

[maypole.git] / lib / Maypole.pm

diff --git a/lib/Maypole.pm b/lib/Maypole.pm
index ab05605105bdde76df8a486519ae46e8099b15e7..b1e066d648ce778c0c78eb51c781e474c3e33762 100644 (file)
--- a/lib/Maypole.pm
+++ b/lib/Maypole.pm
@@ -453,20 +453,14 @@ sub handler : method  {
   $self->status(Maypole::Constants::OK()); # set the default
   $self->__call_hook('start_request_hook');
   return $self->status unless $self->status == Maypole::Constants::OK();
-    
   die "status undefined after start_request_hook()" unless defined
     $self->status;
-    
   $self->get_session;
   $self->get_user;
-    
   my $status = $self->handler_guts;
-
   return $status unless $status == OK;
-
   # TODO: require send_output to return a status code
   $self->send_output;
-
   return $status;
 }