| Subject: | inheritence problems |
You get an error when you subclass HTML::Element. The necessary patch is included and is at http://unf.be/html-element-fix.patch. I applied this tiny fix and it seems to be fixing the problem. If you don't, you get an error like "can't use string 1 as reference"
Thanks!
--- /usr/share/perl5/HTML/Element.pm.old 2005-03-03 22:35:42.658567112 -0800
+++ /usr/share/perl5/HTML/Element.pm 2005-03-03 22:32:48.003118776 -0800
@@ -3433,7 +3433,7 @@
#print "Children: @children\n";
- if($class eq __PACKAGE__) { # Special-case it, for speed:
+ if(UNIVERSAL::isa($class, __PACKAGE__)) { # Special-case it, for speed:
#print "Special cased / [@attributes]\n";
%$node = (%$node, @attributes) if @attributes;