aboutsummaryrefslogtreecommitdiff
path: root/IkiWiki/Plugin/search.pm
diff options
context:
space:
mode:
Diffstat (limited to 'IkiWiki/Plugin/search.pm')
-rw-r--r--IkiWiki/Plugin/search.pm47
1 files changed, 22 insertions, 25 deletions
diff --git a/IkiWiki/Plugin/search.pm b/IkiWiki/Plugin/search.pm
index c8e0dd580..b6fca66ff 100644
--- a/IkiWiki/Plugin/search.pm
+++ b/IkiWiki/Plugin/search.pm
@@ -7,22 +7,22 @@ use strict;
use IkiWiki;
sub import { #{{{
- IkiWiki::hook(type => "checkconfig", id => "hyperestraier",
+ hook(type => "checkconfig", id => "hyperestraier",
call => \&checkconfig);
- IkiWiki::hook(type => "pagetemplate", id => "hyperestraier",
+ hook(type => "pagetemplate", id => "hyperestraier",
call => \&pagetemplate);
- IkiWiki::hook(type => "delete", id => "hyperestraier",
+ hook(type => "delete", id => "hyperestraier",
call => \&delete);
- IkiWiki::hook(type => "change", id => "hyperestraier",
+ hook(type => "change", id => "hyperestraier",
call => \&change);
- IkiWiki::hook(type => "cgi", id => "hyperestraier",
+ hook(type => "cgi", id => "hyperestraier",
call => \&cgi);
} # }}}
sub checkconfig () { #{{{
foreach my $required (qw(url cgiurl)) {
- if (! length $IkiWiki::config{$required}) {
- IkiWiki::error("Must specify $required when using the search plugin\n");
+ if (! length $config{$required}) {
+ error("Must specify $required when using the search plugin\n");
}
}
} #}}}
@@ -36,8 +36,8 @@ sub pagetemplate (@) { #{{{
# Add search box to page header.
if ($template->query(name => "searchform")) {
if (! defined $form) {
- my $searchform = IkiWiki::template("searchform.tmpl", blind_cache => 1);
- $searchform->param(searchaction => $IkiWiki::config{cgiurl});
+ my $searchform = template("searchform.tmpl", blind_cache => 1);
+ $searchform->param(searchaction => $config{cgiurl});
$form=$searchform->output;
}
@@ -46,19 +46,19 @@ sub pagetemplate (@) { #{{{
} #}}}
sub delete (@) { #{{{
- IkiWiki::debug("cleaning hyperestraier search index");
- IkiWiki::estcmd("purge -cl");
- IkiWiki::estcfg();
+ debug("cleaning hyperestraier search index");
+ estcmd("purge -cl");
+ estcfg();
} #}}}
sub change (@) { #{{{
- IkiWiki::debug("updating hyperestraier search index");
- IkiWiki::estcmd("gather -cm -bc -cl -sd",
+ debug("updating hyperestraier search index");
+ estcmd("gather -cm -bc -cl -sd",
map {
- Encode::encode_utf8($IkiWiki::config{destdir}."/".$IkiWiki::renderedfiles{IkiWiki::pagename($_)})
+ Encode::encode_utf8($config{destdir}."/".$renderedfiles{pagename($_)})
} @_
);
- IkiWiki::estcfg();
+ estcfg();
} #}}}
sub cgi ($) { #{{{
@@ -66,25 +66,22 @@ sub cgi ($) { #{{{
if (defined $cgi->param('phrase')) {
# only works for GET requests
- chdir("$IkiWiki::config{wikistatedir}/hyperestraier") || IkiWiki::error("chdir: $!");
- exec("./".IkiWiki::basename($IkiWiki::config{cgiurl})) || IkiWiki::error("estseek.cgi failed");
+ chdir("$config{wikistatedir}/hyperestraier") || error("chdir: $!");
+ exec("./".IkiWiki::basename($config{cgiurl})) || error("estseek.cgi failed");
}
} #}}}
-# Easier to keep these in the IkiWiki namespace.
-package IkiWiki;
-
my $configured=0;
sub estcfg () { #{{{
return if $configured;
$configured=1;
my $estdir="$config{wikistatedir}/hyperestraier";
- my $cgi=basename($config{cgiurl});
+ my $cgi=IkiWiki::basename($config{cgiurl});
$cgi=~s/\..*$//;
open(TEMPLATE, ">$estdir/$cgi.tmpl") ||
error("write $estdir/$cgi.tmpl: $!");
- print TEMPLATE misctemplate("search",
+ print TEMPLATE IkiWiki::misctemplate("search",
"<!--ESTFORM-->\n\n<!--ESTRESULT-->\n\n<!--ESTINFO-->\n\n");
close TEMPLATE;
open(TEMPLATE, ">$estdir/$cgi.conf") ||
@@ -94,12 +91,12 @@ sub estcfg () { #{{{
$template->param(
index => $estdir,
tmplfile => "$estdir/$cgi.tmpl",
- destdir => abs_path($config{destdir}),
+ destdir => IkiWiki::abs_path($config{destdir}),
url => $config{url},
);
print TEMPLATE $template->output;
close TEMPLATE;
- $cgi="$estdir/".basename($config{cgiurl});
+ $cgi="$estdir/".IkiWiki::basename($config{cgiurl});
unlink($cgi);
symlink("/usr/lib/estraier/estseek.cgi", $cgi) ||
error("symlink $cgi: $!");