5d2ebc4ac0
- fix license marker - add patch from upstream rt to fix several warnings with perl 5.12. from gleydson soares
21 lines
544 B
Plaintext
21 lines
544 B
Plaintext
$OpenBSD: patch-lib_XML_Stream_Parser_pm,v 1.1 2011/04/01 07:08:04 jasper Exp $
|
|
|
|
Bug #56574 for XML-Stream: Test suite under perl 5.12 produces warnings
|
|
https://rt.cpan.org/Public/Bug/Display.html?id=56574
|
|
|
|
--- lib/XML/Stream/Parser.pm.orig Thu Mar 31 13:16:59 2011
|
|
+++ lib/XML/Stream/Parser.pm Thu Mar 31 13:21:14 2011
|
|
@@ -63,9 +63,11 @@ use XML::Stream::Node;
|
|
|
|
sub new
|
|
{
|
|
+ my $class = shift;
|
|
+
|
|
my $self = { };
|
|
|
|
- bless($self);
|
|
+ bless($self, $class);
|
|
|
|
my %args;
|
|
while($#_ >= 0) { $args{ lc pop(@_) } = pop(@_); }
|