TextLivedoorWiki.pl

package MT::Plugin::TextLivedoorWiki;

use strict;
use warnings;
use utf8;

my $VERSION = "0.01";
use MT;

MT->add_text_filter(
    text_livedoor_wiki => {
        label     => "LivedoorWiki",
        on_format => sub {
            my ( $text, $ctx ) = @_;
            require Text::Livedoor::Wiki;
            my $parser = Text::Livedoor::Wiki->new( {
                opts => {
                    storage => 'http://static.wiki.livedoor.jp/formatter-storage'
                }
            } );
            my $html = $parser->parse($text);
            $html;
        },
        docs => "http://wiki.livedoor.jp/tag_guide/",
    }
);

1;