diff options
| author | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2003-06-03 15:07:00 +0800 |
|---|---|---|
| committer | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2003-06-03 15:07:00 +0800 |
| commit | 796e3cd5ab96471fea69e2ec766c018c1cc435af (patch) | |
| tree | 593c721a527a5c0333cd91439589918df1f6e903 /blog/blog.pl | |
| parent | aab2e007ac5ff632835653a727d01b1d4de3a9eb (diff) | |
| download | pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.tar pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.tar.gz pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.tar.bz2 pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.tar.lz pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.tar.xz pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.tar.zst pttbbs-796e3cd5ab96471fea69e2ec766c018c1cc435af.zip | |
add Template-Compiled for blog
git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@928 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
Diffstat (limited to 'blog/blog.pl')
| -rwxr-xr-x | blog/blog.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/blog/blog.pl b/blog/blog.pl index 8568c759..c14ca34a 100755 --- a/blog/blog.pl +++ b/blog/blog.pl @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: blog.pl,v 1.17 2003/06/03 02:50:38 in2 Exp $ +# $Id: blog.pl,v 1.18 2003/06/03 07:06:59 in2 Exp $ use CGI qw/:standard/; use lib qw/./; use LocalVars; @@ -205,11 +205,14 @@ sub main } # ¥Î Template Toolkit ¿é¥X + mkdir "$BLOGCACHE/$brdname"; $tmpl = Template->new({INCLUDE_PATH => '.', ABSOLUTE => 0, RELATIVE => 0, RECURSION => 0, EVAL_PERL => 0, + COMPILE_EXT => '.pl', + COMPILE_DIR => "$BLOGCACHE/$brdname/", }); chdir "$BLOGDATA/$brdname/"; $tmpl->process($fn, \%th) || |