X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FEngine%2FCGI.pm;h=ef293578471534688043c3b2f8e91d183f10cdb8;hb=4612bc16fae23b7ee932e184db21f0d975981d86;hp=5f930eddf0dedc87e94a75d8acc02852f0b49258;hpb=e646f111fbeb0ab42406b5be7e6a488df3f1483f;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Engine/CGI.pm b/lib/Catalyst/Engine/CGI.pm index 5f930ed..ef29357 100644 --- a/lib/Catalyst/Engine/CGI.pm +++ b/lib/Catalyst/Engine/CGI.pm @@ -53,10 +53,6 @@ useful in production applications, but it may be helpful for development. =over 4 -=item $c->run - -To be called from a CGI script to start the Catalyst application. - =item $c->cgi This config parameter contains the C object. @@ -65,7 +61,7 @@ This config parameter contains the C object. =head1 OVERLOADED METHODS -This class overloads some methods from C. +This class overloads some methods from C. =over 4 @@ -145,6 +141,9 @@ sub prepare_headers { sub prepare_parameters { my $c = shift; + + $c->cgi->parse_query_string; + my %vars = $c->cgi->Vars; while ( my ( $key, $value ) = each %vars ) { my @values = split "\0", $value; @@ -205,6 +204,10 @@ sub prepare_uploads { } } +=item $c->run + +=cut + sub run { shift->handler } =back