X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/8fd9c9accbc3c3e977aa78cb38bf7b264c53bace..48f9d393393709d8e998a9eb8d4095773ab185a1:/IkiWiki/Plugin/tag.pm diff --git a/IkiWiki/Plugin/tag.pm b/IkiWiki/Plugin/tag.pm index c4e12e61d..2aa70d406 100644 --- a/IkiWiki/Plugin/tag.pm +++ b/IkiWiki/Plugin/tag.pm @@ -9,12 +9,31 @@ use IkiWiki; my %tags; sub import { #{{{ + IkiWiki::hook(type => "getopt", id => "tag", + call => \&getopt); IkiWiki::hook(type => "preprocess", id => "tag", call => \&preprocess); IkiWiki::hook(type => "pagetemplate", id => "tag", call => \&pagetemplate); } # }}} +sub getopt () { #{{{ + eval q{use Getopt::Long}; + Getopt::Long::Configure('pass_through'); + GetOptions("tagbase=s" => \$IkiWiki::config{tagbase}); +} #}}} + +sub tagpage ($) { #{{{ + my $tag=shift; + + if (exists $IkiWiki::config{tagbase} && + defined $IkiWiki::config{tagbase}) { + $tag=$IkiWiki::config{tagbase}."/".$tag; + } + + return $tag; +} #}}} + sub preprocess (@) { #{{{ if (! @_) { return ""; @@ -28,7 +47,7 @@ sub preprocess (@) { #{{{ foreach my $tag (keys %params) { push @{$tags{$page}}, $tag; # hidden WikiLink - push @{$IkiWiki::links{$page}}, $tag; + push @{$IkiWiki::links{$page}}, tagpage($tag); } return ""; @@ -41,9 +60,26 @@ sub pagetemplate (@) { #{{{ my $template=$params{template}; $template->param(tags => [ - map { link => IkiWiki::htmllink($page, $destpage, $_) }, - @{$tags{$page}} + map { + link => IkiWiki::htmllink($page, $destpage, tagpage($_)) + }, @{$tags{$page}} ]) if exists $tags{$page} && @{$tags{$page}} && $template->query(name => "tags"); + + if ($template->query(name => "items")) { + # It's an rss template. Modify each item in the feed, + # adding any categories based on the page for that item. + foreach my $item (@{$template->param("items")}) { + my $p=$item->{page}; + if (exists $tags{$p} && @{$tags{$p}}) { + $item->{categories}=[]; + foreach my $tag (@{$tags{$p}}) { + push @{$item->{categories}}, { + category => $tag, + }; + } + } + } + } } # }}} 1