… | … | ||
---|---|---|---|
214 | 214 | ||
215 | sub add_node($) { | 215 | sub add_node($) { |
216 | my ($node) = @_; | 216 | my ($node) = @_; |
217 | 217 | ||
218 | for (@{ $node->[N_KW] || {} }) { | 218 | for (@{ $node->[N_KW] || {} }) { |
219 | push @{$wiki{lc $_}}, $node; | 219 | push @{$wiki{$_}}, $node; |
220 | } | 220 | } |
221 | } | 221 | } |
222 | 222 | ||
223 | my $root; | 223 | my $root; |
224 | $root->[N_KW] = ["Documents", "pod"]; | 224 | $root->[N_KW] = ["Documents", "pod"]; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |