On Thu, Sep 04, 2003 at 08:31:45PM +0400, Alexey Tourbin wrote: > --- HTML-Tree-3.17/lib/HTML/TreeBuilder.pm~ 2002-08-16 17:49:28 +0000 > +++ HTML-Tree-3.17/lib/HTML/TreeBuilder.pm 2003-09-04 16:22:44 +0000 > @@ -138,6 +138,8 @@ sub new { # constructor! > { > # A hack for certain strange versions of Parser: > my $other_self = HTML::Parser->new(); > + # test compatibility (incomplete tags...) > + $other_self->strict_comment() if $HTML::Parser::VERSION >= 3.29; Ah, this should actually be
$other_self->strict_comment(1) if $HTML::Parser::VERSION >= 3.29; > %$self = (%$self, %$other_self); # copy fields > # Yes, multiple inheritance is messy. Kids, don't try this at home. > bless $other_self, "HTML::TreeBuilder::_hideyhole";
pgp00000.pgp
Description: PGP signature