| 75 |
end => $end, |
end => $end, |
| 76 |
number => $p->{number} || 30, |
number => $p->{number} || 30, |
| 77 |
query => $p->{query}, |
query => $p->{query}, |
| 78 |
|
param_prefix => 'search', |
| 79 |
}; |
}; |
| 80 |
for my $result (@result[$start..$end]) { |
for my $result (@result[$start..$end]) { |
| 81 |
next unless $result; |
next unless $result; |
| 122 |
link-to-resource |
link-to-resource |
| 123 |
@Name: nmz--title |
@Name: nmz--title |
| 124 |
@Formatting: |
@Formatting: |
| 125 |
$p->{-parent}->append_text ($o->{link}->{dest}->{nmz__result}->title); |
# $p->{-parent}->append_text ($o->{link}->{dest}->{nmz__result}->title); |
| 126 |
|
|
| 127 |
|
## TODO: Remove this code after SuikaWiki/0.9 filter for Namazu available |
| 128 |
|
my $title = $o->{link}->{dest}->{nmz__result}->title; |
| 129 |
|
$title =~ s/([0-9A-F][0-9A-F])/pack 'C', hex $1/ge and $title =~ s/\.txt$// |
| 130 |
|
if $title =~ /^(?:[0-9A-F][0-9A-F])+\.txt$/; |
| 131 |
|
$p->{-parent}->append_text ($title); |
| 132 |
|
|
| 133 |
FormattingRule: |
FormattingRule: |
| 134 |
@Category[list]: |
@Category[list]: |
Parent Directory
| 
Revision Log
| 
Patch