X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/170a6de6ab040e4d8e173a28d128c4ae07ac4191..9ae54f904af35f0c499180f27cab00d24093e62b:/IkiWiki/Setup/Standard.pm?ds=sidebyside diff --git a/IkiWiki/Setup/Standard.pm b/IkiWiki/Setup/Standard.pm index a13e7805a..b76c87b8e 100644 --- a/IkiWiki/Setup/Standard.pm +++ b/IkiWiki/Setup/Standard.pm @@ -19,20 +19,48 @@ package IkiWiki; sub setup_standard { my %setup=%{$_[1]}; - if (! $config{refresh}) { + $setup{plugin}=$config{plugin}; + if (exists $setup{add_plugins}) { + push @{$setup{plugin}}, @{$setup{add_plugins}}; + delete $setup{add_plugins}; + } + if (exists $setup{disable_plugins}) { + foreach my $plugin (@{$setup{disable_plugins}}) { + $setup{plugin}=[grep { $_ ne $plugin } @{$setup{plugin}}]; + } + delete $setup{disable_plugins}; + } + if (exists $setup{exclude}) { + $config{wiki_file_prune_regexp}=qr/$config{wiki_file_prune_regexp}|$setup{exclude}/; + } + + if (! $config{refresh} || $config{wrappers}) { debug("generating wrappers.."); + my @wrappers=@{$setup{wrappers}}; + delete $setup{wrappers}; my %startconfig=(%config); - foreach my $wrapper (@{$setup{wrappers}}) { + foreach my $wrapper (@wrappers) { %config=(%startconfig, verbose => 0, %setup, %{$wrapper}); checkconfig(); gen_wrapper(); } %config=(%startconfig); } + foreach my $c (keys %setup) { - $config{$c}=possibly_foolish_untaint($setup{$c}) - if defined $setup{$c} && ! ref $setup{$c}; + if (defined $setup{$c}) { + if (! ref $setup{$c}) { + $config{$c}=possibly_foolish_untaint($setup{$c}); + } + elsif (ref $setup{$c} eq 'ARRAY') { + $config{$c}=[map { possibly_foolish_untaint($_) } @{$setup{$c}}] + } + } + else { + $config{$c}=undef; + } } + if (! $config{refresh}) { $config{rebuild}=1; debug("rebuilding wiki.."); @@ -41,6 +69,7 @@ sub setup_standard { debug("refreshing wiki.."); } + loadplugins(); checkconfig(); lockwiki(); loadindex();