Fix double slash removal in FilePump macro. Fixes bug #11478.

This commit is contained in:
Colin Kuskie 2010-03-16 12:07:25 -07:00
parent 1919973f2b
commit 9810b57f40
3 changed files with 4 additions and 14 deletions

View file

@ -150,7 +150,7 @@ sub process {
elsif ($scheme eq 'http' or $scheme eq 'https') {
$url = $uri->as_string;
}
$url =~ tr{/}{/}s;
$url =~ s$(?<!:)/{2,}$/$g; ##Remove //, unless it's after a :, which is not a valid URL character
$output .= $type eq 'js' ? scriptTag($session, $url, $extras) : linkTag($session, $url, $extras);
}
return $output;