my $tagfile = newpagefile($tagpage, $config{default_pageext});
add_autofile($tagfile, "tag", sub {
- debug(sprintf(gettext("creating tag page %s"), $tag));
+ my $message=sprintf(gettext("creating tag page %s"), $tag);
+ debug($message);
my $template=template("autotag.tmpl");
- $template->param(tag => $tag);
+ $template->param(tag => IkiWiki::basename($tag));
+ $template->param(tagpage => $tagpage);
writefile($tagfile, $config{srcdir}, $template->output);
+ if ($config{rcs}) {
+ IkiWiki::disable_commit_hook();
+ IkiWiki::rcs_add($tagfile);
+ IkiWiki::rcs_commit_staged($message, undef, undef);
+ IkiWiki::enable_commit_hook();
+ }
});
}
}
package IkiWiki::PageSpec;
sub match_tagged ($$;@) {
- return match_link($_[0], IkiWiki::Plugin::tag::taglink($_[1]), linktype => 'tag');
+ my $page=shift;
+ my $glob=shift;
+ return match_link($page, IkiWiki::Plugin::tag::taglink($glob), linktype => 'tag', @_);
}
1