File Coverage

blib/lib/WikiText/Socialtext.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch	1	2	50.0
condition			n/a
subroutine	4	4	100.0
pod	0	1	0.0
total	20	22	90.9

##
# name:      WikiText::Socialtext
# abstract:  Socialtext WikiText Module
# author:    Ingy döt Net
# license:   perl
# copyright: 2008, 2010, 2011

package WikiText::Socialtext;
use 5.008003;
use WikiText 0.15 ();
use base 'WikiText';

our $VERSION = '0.20';

sub to_html {
    my $self = shift;
    my $parser_class = ref($self) . '::Parser';
    eval "require $parser_class; 1"
      or die "Can't load $parser_class:\n$@";
    require WikiText::HTML::Emitter;
    my $parser = $parser_class->new(
        receiver => WikiText::HTML::Emitter->new(break_lines => 1),
    );

    return $parser->parse($self->{wikitext});
}

1;

=head1 SYNOPSIS

    use WikiText::Socialtext;

    my $html = WikiText::Socialtext->new($wikitext)->to_html;

=head1 DESCRIPTION

This module can convert Socialtext markup to HTML.