Show
Ignore:
Timestamp:
04/23/08 16:08:30 (5 years ago)
Author:
yappo
Message:

STDERR にログ吐く処理はCOREにないと

Location:
lang/perl/HTTP-Server-Wrapper/trunk
Files:
2 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/HTTP-Server-Wrapper/trunk/examples/plusplus.pl

    r10170 r10173  
    66use HTTP::Server::Wrapper; 
    77 
    8 my $plusplus = HTTP::Server::Wrapper->new('config.yaml', handle_request => \&handle_request ); 
    9 $plusplus->conf->{global}->{log}->{fh} = \*STDERR; 
    10 $plusplus->run; 
     8HTTP::Server::Wrapper->new('config.yaml', handle_request => \&handle_request )->run; 
    119 
    1210my %karma = {}; 

  • lang/perl/HTTP-Server-Wrapper/trunk/lib/HTTP/Server/Wrapper.pm

    r10162 r10173  
    2222    my $self = $class->NEXT( 'new' => { config => $config } ); 
    2323    $self->set_handle_request(delete $opts{handle_request}) if $opts{handle_request}; 
     24 
     25    $self->conf->{global}->{log}->{fh} ||= \*STDERR; 
    2426 
    2527    return $self;