r23704 - in /trunk/libtree-redblack-perl/debian: changelog patches/ patches/fix_broken_insert_with_custom_compare.patch patches/series

[dmn at users.alioth.debian.org]

Author: dmn
Date: Thu Jul 31 06:39:45 2008
New Revision: 23704

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=23704
Log:
add fix_broken_insert_with_custom_compare.patch; Closes: #493064
Thanks to Craig Soules for reporting and Andre Lucas for the patch.

Added:
    trunk/libtree-redblack-perl/debian/patches/
    trunk/libtree-redblack-perl/debian/patches/fix_broken_insert_with_custom_compare.patch
    trunk/libtree-redblack-perl/debian/patches/series
Modified:
    trunk/libtree-redblack-perl/debian/changelog

Modified: trunk/libtree-redblack-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtree-redblack-perl/debian/changelog?rev=23704&op=diff
==============================================================================
--- trunk/libtree-redblack-perl/debian/changelog (original)
+++ trunk/libtree-redblack-perl/debian/changelog Thu Jul 31 06:39:45 2008
@@ -1,3 +1,10 @@
+libtree-redblack-perl (0.3-9) UNRELEASED; urgency=low
+
+  * add fix_broken_insert_with_custom_compare.patch; Closes: #493064
+    Thanks to Craig Soules for reporting and Andre Lucas for the patch.
+
+ -- Damyan Ivanov <dmn at debian.org>  Thu, 31 Jul 2008 09:36:51 +0300
+
 libtree-redblack-perl (0.3-8) unstable; urgency=low
 
   [ gregor herrmann ]

Added: trunk/libtree-redblack-perl/debian/patches/fix_broken_insert_with_custom_compare.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtree-redblack-perl/debian/patches/fix_broken_insert_with_custom_compare.patch?rev=23704&op=file
==============================================================================
--- trunk/libtree-redblack-perl/debian/patches/fix_broken_insert_with_custom_compare.patch (added)
+++ trunk/libtree-redblack-perl/debian/patches/fix_broken_insert_with_custom_compare.patch Thu Jul 31 06:39:45 2008
@@ -1,0 +1,15 @@
+# Taken from http://rt.cpan.org/Public/Bug/Display.html?id=19431
+# Patch from Andre Lucas
+# http://bugs.debian.org/493064
+# Fixes improper value given to the custom sort function in insert()
+--- a/RedBlack.pm
++++ b/RedBlack.pm
+@@ -137,7 +137,7 @@ sub insert {
+       return $val;
+     }
+     $node = $parent->new($key, $value);
+-    if ($this->{'cmp'} ? $this->{'cmp'}->($key, $node->key) < 0
++    if ($this->{'cmp'} ? $this->{'cmp'}->($key, $parent->key) < 0
+ 		       : $key lt $parent->key) {
+       $parent->left($node);
+     } else {

Added: trunk/libtree-redblack-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtree-redblack-perl/debian/patches/series?rev=23704&op=file
==============================================================================
--- trunk/libtree-redblack-perl/debian/patches/series (added)
+++ trunk/libtree-redblack-perl/debian/patches/series Thu Jul 31 06:39:45 2008
@@ -1,0 +1,1 @@
+fix_broken_insert_with_custom_compare.patch