adding (slightly) better pathinfo adding decision logic
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 26 Jun 2006 14:32:42 +0000 (14:32 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 26 Jun 2006 14:32:42 +0000 (14:32 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@4785 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm

index 8e99bc1..69a4674 100644 (file)
@@ -562,10 +562,11 @@ sub opensearch_feed {
 
        my $host = $cgi->virtual_host || $cgi->server_name;
 
-       my $rel_name = quotemeta($cgi->url(-relative=>1));
-
-       my $add_path = 1;
-       $add_path = 0 if ($cgi->url(-path_info=>1) =~ /$rel_name$/);
+       my $add_path = 0;
+       if ( $cgi->server_software !~ m|^Apache/2.2| ) {
+               my $rel_name = $cgi->url(-relative=>1);
+               $add_path = 1 if ($cgi->url(-path_info=>1) !~ /$rel_name$/);
+       }
 
        my $url = $cgi->url(-path_info=>$add_path);
        my $root = (split 'opensearch', $url)[0];