else {
$dumpedvalue=Dumper($value);
chomp $dumpedvalue;
+ if (length $prefix) {
+ # add to second and subsequent lines
+ my @lines=split(/\n/, $dumpedvalue);
+ $dumpedvalue="";
+ for (my $x=0; $x <= $#lines; $x++) {
+ $lines[$x] =~ s/^\t//;
+ $dumpedvalue.="\t".($x ? $prefix : "").$lines[$x]."\n";
+ }
+ }
$dumpedvalue=~s/^\t//;
+ chomp $dumpedvalue;
}
return "\t$prefix$key => $dumpedvalue,";
push @ret, dumpline($key, $setup->{$key}, $info{type}, "");
delete $setup->{$key};
}
- elsif (exists $info{default} && defined $info{default}) {
- push @ret, dumpline($key, $info{default}, $info{type}, "#");
- }
elsif (exists $info{example}) {
push @ret, dumpline($key, $info{example}, $info{type}, "#");
}
push @ret, dumpvalues(\%setup, IkiWiki::getsetup());
# Load all plugins, so that all setup options are available.
- my @plugins=sort(IkiWiki::listplugins());
+ my @plugins=grep { ! /externaldemo|pythondemo/ } sort(IkiWiki::listplugins());
foreach my $plugin (@plugins) {
eval { IkiWiki::loadplugin($plugin) };
if (exists $IkiWiki::hooks{checkconfig}{$plugin}{call}) {