File Coverage

blib/lib/HTML/HTML5/Builder/Document.pm

Criterion	Covered	Total	%
statement	1	3	33.3
branch			n/a
condition			n/a
subroutine	1	1	100.0
pod			n/a
total	2	4	50.0

package HTML::HTML5::Builder::Document;

use HTML::HTML5::Writer 0.104 qw();
use XML::LibXML 1.60 qw();

use 5.008;
use base qw[XML::LibXML::Document];
use common::sense;
use overload '""' => \&toStringHTML;
use utf8;

BEGIN {
	$HTML::HTML5::Builder::Document::AUTHORITY = 'cpan:TOBYINK';
}
BEGIN {
	$HTML::HTML5::Builder::Document::VERSION   = '0.004';
}

sub new
{
	my ($class, @x) = @_;
	bless $class->SUPER::new(@x), $class;
}

sub toStringHTML
{
	my ($self, @x) = @_;
	return HTML::HTML5::Writer->new(@x)->document($self);
}

*serialize_html = \&toStringHTML;

1;

__END__