1package Text::Trac::Text;
2use strict;
3use warnings;
4
5our $VERSION = '0.24';
6
7sub new {
8	my $class = shift;
9	my %args  = @_;
10	my $self  = {
11		context => $args{context},
12		html    => '',
13	};
14	bless $self, $class;
15}
16
17sub parse {
18	my $self = shift;
19	$self->{html} = '';
20	my $text = shift or return;
21	$self->{html} = $text;
22}
23
24sub html { $_[0]->{html}; }
25
261;
27