Changeset 10552

Show
Ignore:
Timestamp:
04/27/08 16:07:15 (7 months ago)
Author:
yappo
Message:

これはひどい

Location:
lang/perl/HTTP-Engine/trunk
Files:
2 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/HTTP-Engine/trunk/Changes

    r10535 r10552  
    11Revision history for Perl extension HTTP::Engine 
     2 
     3         - fix Interface::Test dosent work bug 
    24 
    350.0.2    2008-04-27T13:50:44+09:00 

  • lang/perl/HTTP-Engine/trunk/lib/HTTP/Engine/Plugin/Interface/Test.pm

    r10259 r10552  
    1 package HTTP::Engine::Plugin::Interface::Standalone; 
     1package HTTP::Engine::Plugin::Interface::Test; 
    22use strict; 
    33use warnings; 
    … …  
    66use HTTP::Request::AsCGI; 
    77 
    8 sub run :InterfaceMethod { 
     8sub run :Method { 
    99    my($senf, $c, $request, $env) = @_; 
    1010    $env ||= \%ENV; 
    … …  
    2525=head1 NAME 
    2626 
    27 HTTP::Engine::Plugin::Interface::Test - HTTP::Engine Test Engine 
     27HTTP::Engine::Plugin::Interface::Test - HTTP::Engine Test Interface 
    2828 
    2929=head1 SYNOPSIS 
    … …  
    3131  use HTTP::Engine; 
    3232  my $response = HTTP::Engine->new( 
    33       config         => { plugins => [ { module => 'Interface::Engine' } ] }, 
     33      config         => { plugins => [ { module => 'Interface::Test' } ] }, 
    3434      handle_request => sub { 
    3535          my $c = shift; 
    36           $c->env('DUMY'); 
     36          $c->env('DUMMY'); 
    3737          $c->res->body( Dumper($e) ); 
    3838      }