Item9722: Incorrect (absolute) links returned by Foswiki::Func::getCg…

…iQuery->url( -absolute => 1)

Dan forgot to merge this to Release01x01 branch so I do it now.


git-svn-id: http://svn.foswiki.org/branches/Release01x01@9352 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

core/lib/Foswiki/Request.pm

@@ -252,6 +252,7 @@ sub url {
       defined $Foswiki::cfg{ScriptUrlPaths}{ $this->action }
       ? $Foswiki::cfg{ScriptUrlPaths}{ $this->action }
       : $Foswiki::cfg{ScriptUrlPath} . '/' . $this->action;
+    $name =~ s(//+)(/)g;
     $name .= $Foswiki::cfg{ScriptSuffix};
     if ($full) {
         my $vh = $this->header('X-Forwarded-Host') || $this->header('Host');