X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/4c2f46e3fa34238bbdd093f0b3d211103a3b94a3..eb4bfa0df545f9b9e70d8915daaea599b5dadb5f:/IkiWiki.pm diff --git a/IkiWiki.pm b/IkiWiki.pm index 051c11b43..e4765219e 100644 --- a/IkiWiki.pm +++ b/IkiWiki.pm @@ -172,14 +172,14 @@ sub getsetup () { #{{{ }, verbose => { type => "boolean", - default => 0, + example => 1, description => "display verbose messages when building?", safe => 1, rebuild => 0, }, syslog => { type => "boolean", - default => 0, + example => 1, description => "log to syslog?", safe => 1, rebuild => 0, @@ -354,6 +354,13 @@ sub getsetup () { #{{{ safe => 0, rebuild => 0, }, + setup => { + type => "internal", + default => undef, + description => "running in setup mode", + safe => 0, + rebuild => 0, + }, refresh => { type => "internal", default => 0, @@ -375,10 +382,10 @@ sub getsetup () { #{{{ safe => 0, rebuild => 0, }, - setup => { + setupfile => { type => "internal", default => undef, - description => "setup file to read", + description => "path to setup file", safe => 0, rebuild => 0, }, @@ -1043,6 +1050,8 @@ sub preprocess ($$$;$$) { #{{{ my $prefix=shift; my $command=shift; my $params=shift; + $params="" if ! defined $params; + if (length $escape) { return "[[$prefix$command $params]]"; } @@ -1176,8 +1185,7 @@ sub preprocess ($$$;$$) { #{{{ }sx; } - # $4 can be undef if the directive was [[!foo]] - $content =~ s{$regex}{$handle->($1, $2, $3, ($4 or ""))}eg; + $content =~ s{$regex}{$handle->($1, $2, $3, $4)}eg; return $content; } #}}}