urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

let's actually work, shall we?

master
joey 2006-05-05 04:33:58 +00:00
parent a59b1ac8d8
commit a14548a6ca
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
IkiWiki/Plugin/haiku.pm
View File

@ -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/<br>\n/mg;
return $haiku
return "\n\n<blockquote>$haiku</blockquote>\n\n";
} # }}}
1