/[Frey]/trunk/lib/Frey/Server.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/Server.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 834 by dpavlin, Wed Dec 10 17:51:29 2008 UTC revision 835 by dpavlin, Sun Dec 14 14:13:35 2008 UTC
# Line 6  with 'Frey::Config'; Line 6  with 'Frey::Config';
6    
7  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
8    
9    #use Carp::REPL; # 'nodie';
10    
11  use lib 'lib';  use lib 'lib';
12  use Frey::Run;  use Frey::Run;
13    
# Line 56  sub request { Line 58  sub request {
58          my $content_type = 'text/plain';          my $content_type = 'text/plain';
59    
60          eval {          eval {
 #       {  
61    
62                  if ( $path =~ m{/reload(.*)} ) {                  if ( $path =~ m{/reload(.*)} ) {
63    
# Line 150  sub request { Line 151  sub request {
151          if ( $@ ) {          if ( $@ ) {
152                  warn "SERVER ERROR: $@";                  warn "SERVER ERROR: $@";
153  #               $req->conn->send_error( 404 );  # FIXME this should probably be 500, but we can't ship page with it  #               $req->conn->send_error( 404 );  # FIXME this should probably be 500, but we can't ship page with it
154                    $content_type = 'text/html';
155                  $self->print( qq{<pre class="frey-error">$@<pre>\r\n\r\n} );                  $self->print( qq{<pre class="frey-error">$@<pre>\r\n\r\n} );
156  #               Carp::REPL::repl;  #               Carp::REPL::repl;
157          }          }
Legend:
Removed from v.834  
changed lines
  Added in v.835
  ViewVC Help
Powered by ViewVC 1.1.26