forward port slash handling fix from 7.4 branch

This commit is contained in:
Colin Kuskie 2008-02-14 23:51:17 +00:00
parent 10c435dccb
commit 39f1a3da3c
3 changed files with 20 additions and 3 deletions

View file

@ -140,7 +140,7 @@ sub extras {
my $self = shift;
my $path = shift;
my $url = $self->session->config->get("extrasURL").'/'.$path;
$url =~ s$(?<!^http:)/{2,}$/$g; ##Remove //, unless it's part of http://
$url =~ s$(?<!:)/{2,}$/$g; ##Remove //, unless it's after a :, which can't be a valid URL character
return $url;
}