[Catalyst-commits] r10363 - Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine

[kmx at dev.catalyst.perl.org]

Author: kmx
Date: 2009-05-29 15:32:50 +0000 (Fri, 29 May 2009)
New Revision: 10363

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/FastCGI.pm
Log:
Engine::FastCGI - Microsoft IIS7 compatibility patch (COOL - it seems that I was the first one who managed CatApp to run as FastCGI on Win2008+IIS7 :)

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/FastCGI.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/FastCGI.pm	2009-05-29 14:38:47 UTC (rev 10362)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/FastCGI.pm	2009-05-29 15:32:50 UTC (rev 10363)
@@ -234,8 +234,8 @@
     if ( $env->{SERVER_SOFTWARE} =~ /lighttpd/ ) {
         $env->{PATH_INFO} ||= delete $env->{SCRIPT_NAME};
     }
-    # Fix the environment variables PATH_INFO and SCRIPT_NAME when running under IIS 6.0
-    elsif ( $env->{SERVER_SOFTWARE} =~ /IIS\/6.0/ ) {
+    # Fix the environment variables PATH_INFO and SCRIPT_NAME when running under IIS
+    elsif ( $env->{SERVER_SOFTWARE} =~ /IIS\/[67].0/ ) {
         my @script_name = split(m!/!, $env->{PATH_INFO});
         my @path_translated = split(m!/|\\\\?!, $env->{PATH_TRANSLATED});
         my @path_info;