Improved performance a bit by not running prepare_query_parameters unless we actually...

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Engine / CGI.pm

diff --git a/lib/Catalyst/Engine/CGI.pm b/lib/Catalyst/Engine/CGI.pm
index 6fb71b9..950cc2d 100644 (file)
--- a/lib/Catalyst/Engine/CGI.pm
+++ b/lib/Catalyst/Engine/CGI.pm
@@ -156,7 +156,9 @@ sub prepare_path {
 sub prepare_query_parameters {
     my ( $self, $c ) = @_;
     
-    $self->SUPER::prepare_query_parameters( $c, $ENV{QUERY_STRING} );
+    if ( $ENV{QUERY_STRING} ) {
+        $self->SUPER::prepare_query_parameters( $c, $ENV{QUERY_STRING} );
+    }
 }
 
 =item $self->prepare_write($c)