From 2ff5d614df2d47d0e2c0000dfdc9b5fb71372e86 Mon Sep 17 00:00:00 2001
From: Chris <chris@starforge.co.uk>
Date: Fri, 11 Apr 2014 14:53:46 +0100
Subject: [PATCH] Ensure trailing / on jspath

---
 Webperl/Template.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Webperl/Template.pm b/Webperl/Template.pm
index 9fc82dd..39aa5fa 100644
--- a/Webperl/Template.pm
+++ b/Webperl/Template.pm
@@ -360,6 +360,7 @@ sub set_template_dir {
     my $jsdir = "js";
     $jsdir .= "_".$self -> {"settings"} -> {"config"} -> {"jsdirid"} if($self -> {"settings"} -> {"config"} -> {"jsdirid"});
     $self -> {"jspath"} = path_join($self -> {"templatepath"}, $jsdir);
+    $self -> {"jspath"} .= "/" unless($self -> {"jspath"} =~ m|/$|); # jspath must have trailing slash
 
     # The URL...
     $self -> {"templateurl"} = path_join($self -> {"cgi"} -> url(-base => 1), $self -> {"templatepath"})."/"