From 2ebee7fa82fde8ae5a84fa99608e4638106d9caf Mon Sep 17 00:00:00 2001 From: Chris Date: Fri, 13 Sep 2013 11:47:49 +0100 Subject: [PATCH] Need trailing / to match docs. --- Webperl/Template.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Webperl/Template.pm b/Webperl/Template.pm index 8e1039c..64b450f 100644 --- a/Webperl/Template.pm +++ b/Webperl/Template.pm @@ -357,7 +357,7 @@ sub set_template_dir { $self -> {"templatepath"} .= "/" unless($self -> {"templatepath"} =~ m|/$|); # templatepath must have trailing slash # The URL... - $self -> {"templateurl"} = path_join($self -> {"cgi"} -> url(-base => 1), $self -> {"templatepath"}) + $self -> {"templateurl"} = path_join($self -> {"cgi"} -> url(-base => 1), $self -> {"templatepath"})."/" if($self -> {"cgi"}); # And the common path, if possible