use IkiWiki;
sub usage () { #{{{
- die gettext("usage: ikiwiki [options] source dest"), "\n";
+ die gettext("usage: ikiwiki [options] source dest"), "\n",
+ gettext(" ikiwiki --setup configfile"), "\n";
} #}}}
sub getconfig () { #{{{
GetOptions(
"setup|s=s" => sub {
require IkiWiki::Setup;
+ my $verbose=$config{verbose};
+ my $syslog=$config{syslog};
IkiWiki::Setup::load($_[1]);
+ $config{setupverbose}=$config{verbose};
+ $config{setupsyslog}=$config{syslog};
+ $config{verbose}=$verbose || $config{setupverbose};
+ $config{syslog}=$syslog;
$config{setup}=1;
},
"dumpsetup|s=s" => \$config{dumpsetup},
print "ikiwiki version $IkiWiki::version\n";
exit;
},
+ "help|h" => sub { $SIG{__WARN__}=sub {}; die },
) || usage();
if (! $config{setup} && ! $config{render}) {
debug(gettext("generating wrappers.."));
require IkiWiki::Wrapper;
my %origconfig=(%config);
- my @wrappers=@{$config{wrappers}};
- delete $config{wrappers};
- delete $config{genwrappers};
- foreach my $wrapper (@wrappers) {
- %config=(%origconfig,
- rebuild => 0,
- verbose => undef,
- %{$wrapper},
- );
+ foreach my $wrapper (@{$config{wrappers}}) {
+ %config=(%origconfig, %{$wrapper});
+ $config{verbose}=$config{setupverbose}
+ if exists $config{setupverbose};
+ $config{syslog}=$config{setupsyslog}
+ if exists $config{setupsyslog};
+ delete @config{qw(setupsyslog setupverbose wrappers genwrappers rebuild)};
checkconfig();
if (! $config{cgi} && ! $config{post_commit}) {
$config{post_commit}=1;
}
if ($config{dumpsetup}) {
+ $config{srdir}=$config{destdir}="";
require IkiWiki::Setup;
IkiWiki::Setup::dump($config{dumpsetup});
}
# do nothing
}
else {
- if (! $config{refresh}) {
+ if ($config{rebuild}) {
debug(gettext("rebuilding wiki.."));
}
else {