forked from github/kensanata.oddmuse
Fixed previous commit in list-search.pl
This commit is contained in:
@@ -16,7 +16,7 @@
|
||||
# 59 Temple Place, Suite 330
|
||||
# Boston, MA 02111-1307 USA
|
||||
|
||||
$ModulesDescription .= '<p>$Id: search-list.pl,v 1.9 2007/11/13 20:22:05 sheep Exp $</p>';
|
||||
$ModulesDescription .= '<p>$Id: search-list.pl,v 1.10 2007/11/13 20:24:50 sheep Exp $</p>';
|
||||
|
||||
push(@MyRules, \&SearchListRule);
|
||||
|
||||
@@ -27,7 +27,10 @@ sub SearchListRule {
|
||||
Dirty($1);
|
||||
my ($oldpos, $old_) = (pos, $_);
|
||||
my $original = $OpenPageName;
|
||||
my $term = $2 or GetId();
|
||||
my $term = $2;
|
||||
if ($term eq "") {
|
||||
$term = GetId();
|
||||
}
|
||||
local ($OpenPageName, %Page);
|
||||
my %hash = ();
|
||||
foreach my $id (SearchTitleAndBody($term)) {
|
||||
|
||||
Reference in New Issue
Block a user