Bug#687059: debdiff for libxml-stream-perl version 1.23-2

Florian Schlichting fschlich at ZEDAT.FU-Berlin.DE
Sun Nov 4 21:15:04 UTC 2012


this is the debdiff for libxml-stream-perl version 1.23-1 to 1.23-2

Florian

diff -u libxml-stream-perl-1.23/debian/changelog libxml-stream-perl-1.23/debian/changelog
--- libxml-stream-perl-1.23/debian/changelog
+++ libxml-stream-perl-1.23/debian/changelog
@@ -1,3 +1,10 @@
+libxml-stream-perl (1.23-2) unstable; urgency=low
+
+  * Team upload.
+  * Add 687059_Use-of-uninitialized-value.patch (closes: #687059).
+
+ -- Florian Schlichting <fschlich at zedat.fu-berlin.de>  Sun, 04 Nov 2012 22:10:09 +0100
+
 libxml-stream-perl (1.23-1) unstable; urgency=low
 
   * New upstream release
diff -u libxml-stream-perl-1.23/debian/patches/series libxml-stream-perl-1.23/debian/patches/series
--- libxml-stream-perl-1.23/debian/patches/series
+++ libxml-stream-perl-1.23/debian/patches/series
@@ -1,0 +2 @@
+687059_Use-of-uninitialized-value.patch
only in patch2:
unchanged:
--- libxml-stream-perl-1.23.orig/debian/patches/687059_Use-of-uninitialized-value.patch
+++ libxml-stream-perl-1.23/debian/patches/687059_Use-of-uninitialized-value.patch
@@ -0,0 +1,25 @@
+Description: Fix "Use of uninitialized value within @_ ..." warning
+ XML::Stream::Parser::new is always called with an odd number of
+ elements (class name and a hash of arguments), so shifting the class
+ name off allows the list to hash conversion to complete without trying
+ to pop an element from an empty list.
+Origin: https://github.com/dap/XML-Stream/commit/7902f8334346590babcf5ac7e1a5c03acc9fa6a2
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=56574
+Bug-Debian: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=687059
+Reviewed-by: Florian Schlichting <fschlich at zedat.fu-berlin.de>
+
+--- a/lib/XML/Stream/Parser.pm
++++ b/lib/XML/Stream/Parser.pm
+@@ -63,9 +63,11 @@
+ 
+ sub new
+ {
++    my $class = shift;
++
+     my $self = { };
+ 
+-    bless($self);
++    bless($self, $class);
+ 
+     my %args;
+     while($#_ >= 0) { $args{ lc pop(@_) } = pop(@_); }



More information about the pkg-perl-maintainers mailing list