X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/ee1ad53c4c2710aa7ded61bdc56f3a8cce514f22..766311f45b4351488d7dad519a6471094a58da16:/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
\n\n"; +} 1$haiku