X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/4956623ee6b95c9fc62d8af39d9236ddeb6de8c5..f38a64a9a7965f06b204d50e739db5b5a5cfe306:/IkiWiki/Plugin/listdirectives.pm?ds=sidebyside diff --git a/IkiWiki/Plugin/listdirectives.pm b/IkiWiki/Plugin/listdirectives.pm index fe4aee3bb..2ab3e4665 100644 --- a/IkiWiki/Plugin/listdirectives.pm +++ b/IkiWiki/Plugin/listdirectives.pm @@ -7,6 +7,7 @@ use strict; use IkiWiki 2.00; sub import { #{{{ + add_underlay("directives"); hook(type => "getsetup", id => "listdirectives", call => \&getsetup); hook(type => "checkconfig", id => "listdirectives", call => \&checkconfig); hook(type => "needsbuild", id => "listdirectives", call => \&needsbuild); @@ -21,33 +22,32 @@ sub getsetup () { #{{{ }, directive_description_dir => { type => "string", - description => "directory in srcdir that contains PreprocessorDirective descriptions", - example => "ikiwiki/plugin", + description => "directory in srcdir that contains directive descriptions", + example => "ikiwiki/directive", safe => 1, rebuild => 1, }, } #}}} my @fulllist; -my @earlylist; +my @shortlist; my $pluginstring; sub checkconfig () { #{{{ if (! defined $config{directive_description_dir}) { - $config{directive_description_dir} = "ikiwiki/plugin"; + $config{directive_description_dir} = "ikiwiki/directive"; } else { - $config{directive_description_dir}=~s/\/+$//; + $config{directive_description_dir} =~ s/\/+$//; } - - @earlylist = sort( keys %{ $IkiWiki::hooks{preprocess} } ); } #}}} sub needsbuild (@) { #{{{ my $needsbuild=shift; - @fulllist = sort( keys %{ $IkiWiki::hooks{preprocess} } ); - $pluginstring = join (' ', @earlylist) . " : ". join (' ', @fulllist); + @fulllist = sort keys %{$IkiWiki::hooks{preprocess}}; + @shortlist = grep { ! $IkiWiki::hooks{preprocess}{$_}{shortcut} } @fulllist; + $pluginstring = join(' ', @shortlist) . " : " . join(' ', @fulllist); foreach my $page (keys %pagestate) { if (exists $pagestate{$page}{listdirectives}{shown}) { @@ -76,15 +76,16 @@ sub preprocess (@) { #{{{ @pluginlist = @fulllist; } else { - @pluginlist = @earlylist; + @pluginlist = @shortlist; } my $result = '