urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add plugin section, and show which plugins need no configuration

master
Joey Hess 2010-02-12 00:51:19 -05:00
parent 5b76fc824c
commit 0ea2f0936b
1 changed files with 13 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
IkiWiki/Setup/Standard.pm
View File

@ -90,16 +90,24 @@ sub gendump ($) {
# disable logging to syslog while dumping
$config{syslog}=undef;
my $curr_section;
eval q{use Text::Wrap};
die $@ if $@;
my %section_plugins;
push @ret, dumpvalues(\%setup, IkiWiki::getsetup());
foreach my $pair (IkiWiki::Setup::getsetup()) {
my $plugin=$pair->[0];
my $setup=$pair->[1];
my %s=@{$setup};
my $section=$s{plugin}->{section};
if (! defined $curr_section || $curr_section ne $section) {
$curr_section=$section;
push @ret, "", "\t#", "\t# $section plugins", "\t#";
push @{$section_plugins{$section}}, $plugin;
if (@{$section_plugins{$section}} == 1) {
push @ret, "", "\t#", "\t# $section plugins",
sub {
wrap("\t# (", "\t# ",
join(", ", @{$section_plugins{$section}})).")"
},
"\t#";
}
my @values=dumpvalues(\%setup, @{$setup});
@ -119,7 +127,7 @@ sub gendump ($) {
"use IkiWiki::Setup::Standard {";
push @ret, "}";
return @ret;
return map { ref $_ ? $_->() : $_ } @ret;
}
1