42 |
@Formatting: |
@Formatting: |
43 |
__ATTRTEXT:%query__; |
__ATTRTEXT:%query__; |
44 |
$p->{query} ||= ($o->{wiki}->{input} ? |
$p->{query} ||= ($o->{wiki}->{input} ? |
45 |
$o->{wiki}->{input}->parameter ('search__query') : undef) |
$o->{wiki}->{input}->parameter ('search__query') : undef); |
46 |
|| $o->{wiki}->{var}->{page}->stringify (wiki => $o->{wiki}, |
unless (defined $p->{query} or length $p->{query}) { |
47 |
delimiter => ' '); |
$p->{query} = join ' ', |
48 |
|
map {my $s = '*'.$_.'*'; |
49 |
|
$s =~ s/^\*\*+//; $s =~ s/\**$/*/; $s} |
50 |
|
@{$o->{wiki}->{var}->{page}}; |
51 |
|
} |
52 |
my $list = $p->{-parent}->append_new_node |
my $list = $p->{-parent}->append_new_node |
53 |
(type => '#element', |
(type => '#element', |
54 |
namespace_uri => $NS_XHTML1, |
namespace_uri => $NS_XHTML1, |