2 # Markdown markup language
3 package IkiWiki::Plugin::mdwn;
10 hook(type => "htmlize", id => "mdwn", call => \&htmlize);
14 sub htmlize (@) { #{{{
16 my $content = $params{content};
18 if (! defined $markdown_sub) {
19 # Markdown is forked and splintered upstream and can be
20 # available in a variety of incompatible forms. Support
23 $blosxom::version="is a proper perl module too much to ask?";
28 $markdown_sub=\&Markdown::Markdown;
31 eval q{use Text::Markdown};
33 $markdown_sub=\&Text::Markdown::Markdown;
36 do "/usr/bin/markdown" ||
37 error("failed to load Markdown.pm perl module ($@) or /usr/bin/markdown ($!)");
38 $markdown_sub=\&Markdown::Markdown;
44 # Workaround for perl bug (#376329)
45 $content=Encode::encode_utf8($content);
46 $content=Encode::encode_utf8($content);
47 $content=Markdown::Markdown($content);
48 $content=Encode::decode_utf8($content);
49 $content=Encode::decode_utf8($content);