X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FEngine%2FFastCGI%2FBase.pm;fp=lib%2FCatalyst%2FEngine%2FFastCGI%2FBase.pm;h=0000000000000000000000000000000000000000;hb=fbcc39ad23f2bbecf5d84c9ba581e6af86fcd460;hp=a2650b810adb596bdcdf2e3f472cbb2c41368fec;hpb=21465c884872c1ec8c30acd72796445f9eaacb31;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Engine/FastCGI/Base.pm b/lib/Catalyst/Engine/FastCGI/Base.pm deleted file mode 100644 index a2650b8..0000000 --- a/lib/Catalyst/Engine/FastCGI/Base.pm +++ /dev/null @@ -1,75 +0,0 @@ -package Catalyst::Engine::FastCGI::Base; - -use strict; -use base 'Catalyst::Engine::CGI::Base'; - -use FCGI; - -__PACKAGE__->mk_accessors('fastcgi'); - -=head1 NAME - -Catalyst::Engine::FastCGI::Base - Base class for FastCGI Engines - -=head1 DESCRIPTION - -This is a base class for FastCGI engines. - -=head1 METHODS - -=over 4 - -=item $c->fastcgi - -Contains the C object. - -=back - -=head1 OVERLOADED METHODS - -This class overloads some methods from C. - -=over 4 - -=item $c->prepare_request - -=cut - -sub prepare_request { - my ( $c, $request ) = @_; - $c->fastcgi($request); -} - -=item $c->run - -=cut - -sub run { - my ( $class, @arguments ) = @_; - - my $request = FCGI::Request(); - - while ( $request->Accept >= 0 ) { - $class->handler( $request, @arguments ); - } -} - -=back - -=head1 SEE ALSO - -L, L, L. - -=head1 AUTHOR - -Sebastian Riedel, C -Christian Hansen, C - -=head1 COPYRIGHT - -This program is free software, you can redistribute it and/or modify it under -the same terms as Perl itself. - -=cut - -1;