[Catalyst-commits] r12083 - Catalyst-Runtime/5.80/branches/fix_path_info_decoding/lib/Catalyst/Engine

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-11-30 21:02:14 +0000 (Mon, 30 Nov 2009)
New Revision: 12083

Modified:
   Catalyst-Runtime/5.80/branches/fix_path_info_decoding/lib/Catalyst/Engine/FastCGI.pm
Log:
I think the nginx hackery can just die with the new code in ::Engine::CGI

Modified: Catalyst-Runtime/5.80/branches/fix_path_info_decoding/lib/Catalyst/Engine/FastCGI.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/fix_path_info_decoding/lib/Catalyst/Engine/FastCGI.pm	2009-11-30 20:57:37 UTC (rev 12082)
+++ Catalyst-Runtime/5.80/branches/fix_path_info_decoding/lib/Catalyst/Engine/FastCGI.pm	2009-11-30 21:02:14 UTC (rev 12083)
@@ -234,12 +234,9 @@
     if ( $env->{SERVER_SOFTWARE} =~ /lighttpd/ ) {
         $env->{PATH_INFO} ||= delete $env->{SCRIPT_NAME};
     }
-    elsif ( $env->{SERVER_SOFTWARE} =~ /^nginx/ ) {
-        my $script_name = $env->{SCRIPT_NAME};
-        $env->{PATH_INFO} =~ s/^$script_name//g;
-    }
     # Fix the environment variables PATH_INFO and SCRIPT_NAME when running 
     # under IIS
+    # FIXME - How does this handle %7F?
     elsif ( $env->{SERVER_SOFTWARE} =~ /IIS\/[6-9]\.[0-9]/ ) {
         my @script_name = split(m!/!, $env->{PATH_INFO});
         my @path_translated = split(m!/|\\\\?!, $env->{PATH_TRANSLATED});