X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/ee1ad53c4c2710aa7ded61bdc56f3a8cce514f22..e4516078cc7c5e9148a0f079e3d9a71eeccd4155:/IkiWiki/Plugin/haiku.pm diff --git a/IkiWiki/Plugin/haiku.pm b/IkiWiki/Plugin/haiku.pm index 35208e56c..7ce74696b 100644 --- a/IkiWiki/Plugin/haiku.pm +++ b/IkiWiki/Plugin/haiku.pm @@ -4,18 +4,34 @@ package IkiWiki::Plugin::haiku; use warnings; use strict; -use IkiWiki 2.00; +use IkiWiki 3.00; -sub import { #{{{ +sub import { + hook(type => "getsetup", id => "haiku", call => \&getsetup); hook(type => "preprocess", id => "haiku", call => \&preprocess); -} # }}} +} -sub preprocess (@) { #{{{ +sub getsetup { + return + plugin => { + safe => 1, + rebuild => undef, + section => "widget", + }, +} + +sub preprocess (@) { my %params=@_; my $haiku; eval q{use Coy}; - if ($@ || ! Coy->can("Coy::with_haiku")) { + if ($config{deterministic}) { + $haiku = "Coy changes often. + For deterministic builds + try this substitute. + ", + } + elsif ($@ || ! Coy->can("Coy::with_haiku")) { my @canned=( "The lack of a Coy: No darting, subtle haiku. @@ -42,9 +58,9 @@ sub preprocess (@) { #{{{ } $haiku=~s/^\s+//mg; - $haiku=~s/\n/
\n/mg; + $haiku=~s/\n/
\n/mg; - return "\n\n
$haiku
\n\n"; -} # }}} + return "\n\n

$haiku

\n\n"; +} 1