[ 1475220 ] some 6.99 templates have double slashes

This commit is contained in:
JT Smith 2006-04-28 16:59:32 +00:00
parent a1570eeb71
commit 2f24cd3f3c
51 changed files with 127 additions and 160 deletions

View file

@ -38,6 +38,7 @@ This package provides URL writing functionality. It is important that all WebGUI
$string = $url->append($base, $pairs);
$string = $url->escape($string);
$string = $url->extras($path);
$string = $url->gateway($pageUrl, $pairs);
$string = $url->getRequestedUrl;
$string = $url->getSiteURL;
@ -122,6 +123,26 @@ sub escape {
}
#-------------------------------------------------------------------
=head2 extras ( path )
Combinds the base extrasURL defined in the config file with a specfied path.
=head3 path
The path to the thing in the extras folder that you're referencing. Note that the preceding / is not necessary.
=cut
sub extras {
my $self = shift;
my $path = shift;
my $url = $self->session->config->get("extrasURL").'/'.$path;
$url =~ s/\/+/\//g;
return $url;
}
#-------------------------------------------------------------------
=head2 gateway ( pageURL [ , pairs ] )