按照下述方法修改mt-xsearch.cgi和plugins/mt-xsearch.pl文件，以让MT-XSearch支持多国语言，并修复其Bug。
[--- mt-xsearch.cgi.bak Fri Aug 27 12:06:24 2004
+++ mt-xsearch.cgi Sat Jun 11 02:58:33 2005
@@ -41,7 +41,8 @@
$ctx->stash('CGI',$q);
my $out = $tmpl->build($ctx)
or die "Building search template failed: ".$tmpl->errstr;
- print $q->header.$out;
+ my $charset = $mt->{cfg}->PublishCharset;
+ print $q->header(-charset=>$charset).$out;
};
if ($@) {
print "Content-Type: text/html\n\n";
--- plugins/mt-xsearch.pl.bak Sat May 14 06:01:19 2005
+++ plugins/mt-xsearch.pl Sat Jun 11 00:31:39 2005
@@ -63,7 +63,7 @@
my $pages = $limit ? ($count-($count % $limit)) / $limit : 1;
$pages += ($limit && $count % $limit) ? 1 : 0;
my $offset = $xsearch->args->{offset} || 0;
- my $current = $offset / $limit + 1;
+ my $current = $limit ? ($offset / $limit + 1) : 1;
$ctx->stash('MT::XSearch::current_page',$current);
$ctx->stash('MT::XSearch::pages',$pages);
my $builder =
$ctx->stash('builder');]
如果主机空间安装有CGI::Cache模块，则可以按照下面的方法修改mt-xsearch.cgi，用缓存来让MT-XSearch提供更好的负载。
--- mt-xsearch.cgi.bak Fri Aug 27 12:06:24 2004
+++ mt-xsearch.cgi Sat Jun 11 03:44:32 2005
@@ -17,6 +17,7 @@
}
use CGI;
+use CGI::Cache;
use MT;
use MT::ConfigMgr;
use MT::Template;
@@ -27,10 +28,13 @@
my $mt = MT->new( Config => $MT_DIR . 'mt.cfg', Directory => $MT_DIR )
or die MT->errstr;
my $q = new CGI;
+ CGI::Cache::setup({ cache_options => { cache_root => './cache', default_expires_in => 3600 } });
my $blog_id = $q->param('blog_id') or
die "Missing parameter blog_id";
my $key = $q->param('search_key') or
die "Missing parameter key";
+ CGI::Cache::set_key($q->Vars);
+ CGI::Cache::start() or exit;
my $search = MT::XSearch->execute($q);
my $tmpl = MT::Template->load( {
name=>'XSearch '.$key,
@@ -41,7 +45,14 @@
$ctx->stash('CGI',$q);
my $out = $tmpl->build($ctx)
or die "Building search template failed: ".$tmpl->errstr;
- print $q->header.$out;
+ my $charset = $mt->{cfg}->PublishCharset;
+ my @m = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
+ my @w = qw(Sun Mon Tue Wed Thu Fri Sat);
+ my ($sec, $min, $hour, $mday, $mon, $year, $wday) = gmtime(time);
+ my $now = sprintf("%3s, %02d %3s %04d %02d:%02d:%02d GMT",
+ $w[$wday], $mday, $m[$mon], $year+1900, $hour, $min, $sec);
+ print $q->header(-charset=>$charset,-Last_Modified=>$now).$out;
+ CGI::Cache::stop();
};
if ($@) {
print "Content-Type: text/html\n\n";
你会看到，在上面这段程序中，我们定义了缓存使用的目录－－“./cache”，以及缓存的持续时间－－3600″（1个小时）。你也可以修改成其它需要的值，但一定要根据程序中的情况建立一个放置缓存的目录，并为其赋予写入权限（一般设置权限为777即可）。这里，我们要在Movable Type的安装目录下建立一个名为cache的文件夹，设置其权限为777。