projects
/
ikiwiki
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
* Patch from Enrico that
[ikiwiki]
/
IkiWiki
/
Plugin
/
tag.pm
1
#!/usr/bin/perl
2
# Ikiwiki tag plugin.
3
package IkiWiki::Plugin::tag;
4
5
use warnings;
6
use strict;
7
use IkiWiki;
8
9
my %tag;
10
11
sub import { #{{{
12
IkiWiki::hook(type => "preprocess", id => "tag", call => \&preprocess);
13
} # }}}
14
15
sub preprocess (@) { #{{{
16
if (! @_) {
17
return "";
18
}
19
my %params=@_;
20
my $page = $params{page};
21
delete $params{page};
22
23
foreach my $tag (keys %params) {
24
# hidden WikiLink
25
push @{$IkiWiki::links{$page}}, $tag;
26
}
27
28
return "";
29
} # }}}
30
31
1