empty_attribute.t

use Test::More tests => 1;
use strict;
use warnings;

use HTML::Parser::Simple::Attributes;

my($a);

eval
{
		$a = HTML::Parser::Simple::Attributes -> parse_attributes('name="name" type=""');
};

if ($@)
{
		is($$a{type}, undef, 'empty attribute croaked');
}
else
{
		BAILOUT('empty attribute failed to croak');
}