Changeset 23301

Show
Ignore:
Timestamp:
11/12/08 13:05:05 (5 years ago)
Author:
yappo
Message:

fied Interface::ModPerl?'s SYNOPSIS is bug

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/HTTP-Engine/trunk/lib/HTTP/Engine/Interface/ModPerl.pm

    r23289 r23301  
    5959use APR::Table; 
    6060use HTTP::Engine; 
    61  
     61ndler  
    6262has 'apache' => ( 
    6363    is      => 'rw', 
     
    138138  use HTTP::Engine; 
    139139 
    140   sub run { 
     140  sub setup_engine { 
    141141      my($self, $conf) = @_; 
    142142      $conf->{request_handler} = sub { $self->handle_request(@_) }; 
    143143      HTTP::Engine->new( 
    144144          interface => $conf, 
    145       )->run; 
     145      ); 
    146146  } 
    147147   
     
    159159  use warnings; 
    160160  use App; 
    161   App->new->run({ 
     161  App->new->setup_engine({ 
    162162      module => 'ServerSimple', 
    163163      args => { port => 9999 }, 
    164   }); 
     164  })->run; 
    165165 
    166166 
     
    174174      my($class, $r, $context_key) = @_; 
    175175 
    176       App->new->run({ 
     176      App->new->setup_engine({ 
    177177          module => 'ModPerl', 
    178178      });