From 817f79e66410150a01637f2243a1b0dd69c8c5a4 Mon Sep 17 00:00:00 2001 From: "mkanat%bugzilla.org" <> Date: Tue, 16 Oct 2007 15:15:03 +0000 Subject: Bug 383522: mod_perl creates a separate template directory Patch By Max Kanat-Alexander r=LpSolit, a=mkanat --- Bugzilla/Template.pm | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) diff --git a/Bugzilla/Template.pm b/Bugzilla/Template.pm index 0f08662e0..62334999d 100644 --- a/Bugzilla/Template.pm +++ b/Bugzilla/Template.pm @@ -42,11 +42,13 @@ use Bugzilla::User; use Bugzilla::Error; use Bugzilla::Status; +use Cwd qw(abs_path); use MIME::Base64; # for time2str - replace by TT Date plugin?? use Date::Format (); +use File::Basename qw(dirname); use File::Find; -use File::Path; +use File::Path qw(rmtree mkpath); use File::Spec; use IO::Dir; @@ -783,6 +785,23 @@ sub precompile_templates { } } + # Under mod_perl, we look for templates using the absolute path of the + # template directory, which causes Template Toolkit to look for their + # *compiled* versions using the full absolute path under the data/template + # directory. (Like data/template/var/www/html/mod_perl/.) To avoid + # re-compiling templates under mod_perl, we symlink to the + # already-compiled templates. + my $abs_root = dirname(abs_path($templatedir)); + mkpath("$datadir/template$abs_root"); + my $todir = "$datadir/template$abs_root"; + # We use abs2rel so that the symlink will look like "../../../../template" + # which works, while just "data/template/template/" doesn't work. + my $fromdir = File::Spec->abs2rel("$datadir/template/template", $todir); + # We eval for systems (like Windows) that can't symlink, where "symlink" + # throws a fatal error. + eval { symlink($fromdir, "$todir/template") + or warn "Failed to symlink from $fromdir to $todir: $!" }; + # If anything created a Template object before now, clear it out. delete Bugzilla->request_cache->{template}; } -- cgit v1.2.3-24-g4f1b