Subject: | xml_compare and xml_identity fail when using OO approach |
The xml_compare() and xml_identity() functions never shift() in $self.
The functions therefore work fine when called as functions, but always return false when called as object methods.
Fix:
Add the line
my $self = ( ref $_[0] && (ref $_[0]) =~ /XML::Dumper/ ) ? shift : $dump;
as in xml2pl(), etc.
Thanks,
Dustin Cram