From a14548a6ca2bf384408b2a5f58aa337f55a392bf Mon Sep 17 00:00:00 2001 From: joey Date: Fri, 5 May 2006 04:33:58 +0000 Subject: let's actually work, shall we? --- IkiWiki/Plugin/haiku.pm | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) (limited to 'IkiWiki') diff --git a/IkiWiki/Plugin/haiku.pm b/IkiWiki/Plugin/haiku.pm index 0e93e9d8d..e2873ec6f 100644 --- a/IkiWiki/Plugin/haiku.pm +++ b/IkiWiki/Plugin/haiku.pm @@ -35,11 +35,8 @@ sub preprocess (@) { #{{{ $haiku=$canned[rand @canned]; } else { - # Coy is rather strange, so the best way to get a haiku - # out of it is to die.. - eval {die exists $params{hint} ? $params{hint} : $params{page}}; - $haiku=$@; - + $haiku=Coy::with_haiku($params{hint} ? $params{hint} : $params{page}); + # trim off other text $haiku=~s/\s+-----\n//s; $haiku=~s/\s+-----.*//s; @@ -48,7 +45,7 @@ sub preprocess (@) { #{{{ $haiku=~s/^\s+//mg; $haiku=~s/\n/
\n/mg; - return $haiku + return "\n\n
$haiku
\n\n"; } # }}} 1 -- cgit v1.2.3