Changeset 11074

Show
Ignore:
Timestamp:
05/04/08 15:09:36 (5 years ago)
Author:
tokuhirom
Message:

perltidy

Location:
lang/perl/HTTP-Engine/branches/moose/lib/HTTP/Engine
Files:
2 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/HTTP-Engine/branches/moose/lib/HTTP/Engine/Context.pm

    r11071 r11074  
    1515    isa      => 'HTTP::Engine::Request', 
    1616    required => 1, 
    17     default => sub { 
     17    default  => sub { 
    1818        my $self = shift; 
    1919        HTTP::Engine::Request->new( context => $self ); 
    2020    }, 
    21     trigger  => sub { 
     21    trigger => sub { 
    2222        my $self = shift; 
    2323        $self->req->context($self); 
     
    2929    isa      => 'HTTP::Engine::Response', 
    3030    required => 1, 
    31     default => sub { 
     31    default  => sub { 
    3232        HTTP::Engine::Response->new; 
    3333    }, 
  • lang/perl/HTTP-Engine/branches/moose/lib/HTTP/Engine/Request.pm

    r11073 r11074  
    1515 
    1616has context => ( 
    17     is      => 'rw', 
    18     isa     => 'HTTP::Engine::Context', 
     17    is       => 'rw', 
     18    isa      => 'HTTP::Engine::Context', 
    1919    weak_ref => 1, 
    2020); 
     
    5050 
    5151has uri => ( 
    52     is  => 'rw', 
    53     isa => 'Uri', 
     52    is     => 'rw', 
     53    isa    => 'Uri', 
    5454    coerce => 1, 
    5555);