/[pub]/suikawiki/script/misc/plugins/link/namazu.wp2
Suika

Diff of /suikawiki/script/misc/plugins/link/namazu.wp2

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by wakaba, Sat May 1 03:51:13 2004 UTC revision 1.10 by wakaba, Sun Jan 30 12:25:07 2005 UTC
# Line 45  FormattingRule: Line 45  FormattingRule:
45                       $o->{wiki}->{input}->parameter ('search__query') : undef);                       $o->{wiki}->{input}->parameter ('search__query') : undef);
46      unless (defined $p->{query} or length $p->{query}) {      unless (defined $p->{query} or length $p->{query}) {
47        $p->{query} = join ' ',        $p->{query} = join ' ',
48                      map {my $s = '*'.$_.'*';                      map {my $s = length $_ > 2 ? '*'.$_.'*' : $_;
49                           $s =~ s/^\*\*+//; $s =~ s/\*+$/*/; $s}                           $s =~ s/^\*\*+//; $s =~ s/\*\*+$/*/; $s}
50                      @{$o->{wiki}->{var}->{page}};                      @{$o->{wiki}->{var}->{page}};
51      }      }
52      my $list = $p->{-parent}->append_new_node      my $list = $p->{-parent}->append_new_node
# Line 63  FormattingRule: Line 63  FormattingRule:
63         sortMethod => NMZ_SORTBYSCORE,         sortMethod => NMZ_SORTBYSCORE,
64         sortOrder => NMZ_ASCENDSORT,         sortOrder => NMZ_ASCENDSORT,
65         lang => 'ja');         lang => 'ja');
66        unless (@result) {
67          $p->{query} =~ tr/\*/ /;
68     \    @result = Search::Namazu::Search
69            (index => $o->{wiki}->{config}->{path_to}->{namazu__index_dir},
70             query => $p->{query},
71             sortMethod => NMZ_SORTBYSCORE,
72             sortOrder => NMZ_ASCENDSORT,
73             lang => 'ja');
74        }
75      __ATTRTEXT:%start__;__ATTRTEXT:%number__;      __ATTRTEXT:%start__;__ATTRTEXT:%number__;
76      my $start = length $p->{start} ? $p->{start} :      my $start = length $p->{start} ? $p->{start} :
77                  $o->{wiki}->{input}->parameter ('search--range-start') || 0;                  $o->{wiki}->{input}->parameter ('search--range-start') || 0;

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.10

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24