[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Pre-approval for perl/5.10.0-17



Hi release team,

I'd like to upload this:

Changes: 
 perl (5.10.0-17) unstable; urgency=low
 .
   * Fix 'Unknown error' messages with attribute.pm. (Closes: #488088)
   * Add conflicts/replaces/provides for podlators-perl. (Closes: #503123)
   * Raise the timeout of ext/threads/shared/t/stress.t to accommodate
     slower build hosts. (Closes: #501970)
   * Stop t/op/fork.t relying on rand(). (Closes: #317843)

Please ack/nack, see the attached (filtered) debdiff for the patches. 

Sorry about the debian/control mess, I'll wrap the lines post-lenny.

Thanks for your work,
-- 
Niko Tyni   ntyni@debian.org
--- perl-5.10.0/debian/changelog
+++ perl-5.10.0/debian/changelog
@@ -1,3 +1,13 @@
+perl (5.10.0-17) unstable; urgency=low
+
+  * Fix 'Unknown error' messages with attribute.pm. (Closes: #488088)
+  * Add conflicts/replaces/provides for podlators-perl. (Closes: #503123)
+  * Raise the timeout of ext/threads/shared/t/stress.t to accommodate
+    slower build hosts. (Closes: #501970)
+  * Stop t/op/fork.t relying on rand(). (Closes: #317843)
+
+ -- Niko Tyni <ntyni@debian.org>  Sat, 25 Oct 2008 22:43:34 +0300
+
 perl (5.10.0-16) unstable; urgency=low
 
   * Revert the perldoc "pod2man --utf8" change from 5.10.0-14.
--- perl-5.10.0/debian/control
+++ perl-5.10.0/debian/control
@@ -69,9 +69,9 @@
 Priority: standard
 Architecture: all
 Depends: perl (>= ${Upstream-Version}-1)
-Conflicts: libpod-parser-perl (<< 1.32-1), libansicolor-perl (<< 1.10-1), libfile-temp-perl (<< 0.18), libnet-perl (<= 1:1.19-3), libattribute-handlers-perl (<< 0.78.02-1), libcgi-pm-perl (<< 3.15-1), libi18n-langtags-perl (<< 0.35-1), liblocale-maketext-perl (<< 1.08-1), libmath-bigint-perl (<< 1.77-1), libnet-ping-perl (<< 2.31-1), libtest-harness-perl (<< 2.56-1), libtest-simple-perl (<< 0.62-1), liblocale-codes-perl (<< 2.06.1-1), libmodule-corelist-perl (<< 2.13-1), libio-zlib-perl (<< 1.07-1), libarchive-tar-perl (<= 1.38-2), libextutils-cbuilder-perl (<< 0.21-1), libmodule-build-perl (<< 0.2808.1-1), libmodule-load-perl (<< 0.12-1), liblocale-maketext-simple-perl (<< 0.18-1), libparams-check-perl (<< 0.26-1), libmodule-pluggable-perl (<< 3.6-1), libmodule-load-conditional-perl (<< 0.22-1), libcpan-plus-perl (<< 0.83.09-1), libversion-perl (<< 1:0.7400-2), libpod-simple-perl (<< 3.05-2), libextutils-parsexs-perl (<= 2.18)
-Replaces: libpod-parser-perl, libansicolor-perl, libfile-temp-perl, libnet-perl, libattribute-handlers-perl, libcgi-pm-perl, libi18n-langtags-perl, liblocale-maketext-perl, libmath-bigint-perl, libnet-ping-perl, libtest-harness-perl, libtest-simple-perl, liblocale-codes-perl, libmodule-corelist-perl, libio-zlib-perl, libarchive-tar-perl, libextutils-cbuilder-perl, libmodule-build-perl, libmodule-load-perl, liblocale-maketext-simple-perl, libparams-check-perl, libmodule-pluggable-perl, libmodule-load-conditional-perl, libcpan-plus-perl, libversion-perl, libpod-simple-perl, libextutils-parsexs-perl
-Provides: libpod-parser-perl, libansicolor-perl, libfile-temp-perl, libnet-perl, libattribute-handlers-perl, libcgi-pm-perl, libi18n-langtags-perl, liblocale-maketext-perl, libmath-bigint-perl, libnet-ping-perl, libtest-harness-perl, libtest-simple-perl, liblocale-codes-perl, libmodule-corelist-perl, libio-zlib-perl, libarchive-tar-perl, libextutils-cbuilder-perl, libmodule-build-perl, libmodule-load-perl, liblocale-maketext-simple-perl, libparams-check-perl, libmodule-pluggable-perl, libmodule-load-conditional-perl, libcpan-plus-perl, libversion-perl, libpod-simple-perl, libextutils-parsexs-perl
+Conflicts: libpod-parser-perl (<< 1.32-1), libansicolor-perl (<< 1.10-1), libfile-temp-perl (<< 0.18), libnet-perl (<= 1:1.19-3), libattribute-handlers-perl (<< 0.78.02-1), libcgi-pm-perl (<< 3.15-1), libi18n-langtags-perl (<< 0.35-1), liblocale-maketext-perl (<< 1.08-1), libmath-bigint-perl (<< 1.77-1), libnet-ping-perl (<< 2.31-1), libtest-harness-perl (<< 2.56-1), libtest-simple-perl (<< 0.62-1), liblocale-codes-perl (<< 2.06.1-1), libmodule-corelist-perl (<< 2.13-1), libio-zlib-perl (<< 1.07-1), libarchive-tar-perl (<= 1.38-2), libextutils-cbuilder-perl (<< 0.21-1), libmodule-build-perl (<< 0.2808.1-1), libmodule-load-perl (<< 0.12-1), liblocale-maketext-simple-perl (<< 0.18-1), libparams-check-perl (<< 0.26-1), libmodule-pluggable-perl (<< 3.6-1), libmodule-load-conditional-perl (<< 0.22-1), libcpan-plus-perl (<< 0.83.09-1), libversion-perl (<< 1:0.7400-2), libpod-simple-perl (<< 3.05-2), libextutils-parsexs-perl (<= 2.18), podlators-perl (<< 2.2.0)
+Replaces: libpod-parser-perl, libansicolor-perl, libfile-temp-perl, libnet-perl, libattribute-handlers-perl, libcgi-pm-perl, libi18n-langtags-perl, liblocale-maketext-perl, libmath-bigint-perl, libnet-ping-perl, libtest-harness-perl, libtest-simple-perl, liblocale-codes-perl, libmodule-corelist-perl, libio-zlib-perl, libarchive-tar-perl, libextutils-cbuilder-perl, libmodule-build-perl, libmodule-load-perl, liblocale-maketext-simple-perl, libparams-check-perl, libmodule-pluggable-perl, libmodule-load-conditional-perl, libcpan-plus-perl, libversion-perl, libpod-simple-perl, libextutils-parsexs-perl, podlators-perl
+Provides: libpod-parser-perl, libansicolor-perl, libfile-temp-perl, libnet-perl, libattribute-handlers-perl, libcgi-pm-perl, libi18n-langtags-perl, liblocale-maketext-perl, libmath-bigint-perl, libnet-ping-perl, libtest-harness-perl, libtest-simple-perl, liblocale-codes-perl, libmodule-corelist-perl, libio-zlib-perl, libarchive-tar-perl, libextutils-cbuilder-perl, libmodule-build-perl, libmodule-load-perl, liblocale-maketext-simple-perl, libparams-check-perl, libmodule-pluggable-perl, libmodule-load-conditional-perl, libcpan-plus-perl, libversion-perl, libpod-simple-perl, libextutils-parsexs-perl, podlators-perl
 Description: Core Perl modules
  Architecture independent Perl modules.  These modules are part of Perl and
  required if the `perl' package is installed.
--- perl-5.10.0.orig/debian/patches/31_fix_attributes_unknown_error
+++ perl-5.10.0/debian/patches/31_fix_attributes_unknown_error
@@ -0,0 +1,67 @@
+Fix 'Unknown error' messages with attribute.pm. (Closes: #488088)
+
+[perl #49472]
+blead change 33265
+
+From: Dave Mitchell <davem@fdisolutions.com>
+Date: Sat, 9 Feb 2008 14:56:23 +0000
+Subject: [PATCH] [perl #49472] Attributes + Unkown Error
+ An errored attribute sub still processes the attributes,
+ which require's attribute.pm, so make sure the error state is
+ passed to the new require
+
+p4raw-id: //depot/perl@33265
+---
+ t/comp/require.t |   16 +++++++++++++++-
+ toke.c           |    1 +
+ 2 files changed, 16 insertions(+), 1 deletions(-)
+
+diff --git a/t/comp/require.t b/t/comp/require.t
+index af5e4b2..0746b3b 100755
+--- a/t/comp/require.t
++++ b/t/comp/require.t
+@@ -15,7 +15,7 @@ krunch.pm krunch.pmc whap.pm whap.pmc);
+ 
+ my $Is_EBCDIC = (ord('A') == 193) ? 1 : 0;
+ my $Is_UTF8   = (${^OPEN} || "") =~ /:utf8/;
+-my $total_tests = 49;
++my $total_tests = 50;
+ if ($Is_EBCDIC || $Is_UTF8) { $total_tests -= 3; }
+ print "1..$total_tests\n";
+ 
+@@ -258,6 +258,20 @@ EOT
+     }
+ }
+ 
++#  [perl #49472] Attributes + Unkown Error
++
++{
++    do_require
++	'use strict;sub MODIFY_CODE_ATTRIBUTE{} sub f:Blah {$nosuchvar}';
++    my $err = $@;
++    $err .= "\n" unless $err =~ /\n$/;
++    unless ($err =~ /Global symbol "\$nosuchvar" requires /) {
++	$err =~ s/^/# /mg;
++	print "${err}not ";
++    }
++    print "ok ", ++$i, " [perl #49472]\n";
++}
++
+ ##########################################
+ # What follows are UTF-8 specific tests. #
+ # Add generic tests before this point.   #
+diff --git a/toke.c b/toke.c
+index 2ae8b75..ecee902 100644
+--- a/toke.c
++++ b/toke.c
+@@ -692,6 +692,7 @@ Perl_lex_start(pTHX_ SV *line, PerlIO *rsfp, bool new_filter)
+ #else
+     parser->nexttoke = 0;
+ #endif
++    parser->error_count = oparser ? oparser->error_count : 0;
+     parser->copline = NOLINE;
+     parser->lex_state = LEX_NORMAL;
+     parser->expect = XSTATE;
+-- 
+1.5.6.5
+
--- perl-5.10.0.orig/debian/patches/32_fix_fork_rand
+++ perl-5.10.0/debian/patches/32_fix_fork_rand
@@ -0,0 +1,43 @@
+Stop t/op/fork.t relying on rand(). (Closes: #317843)
+
+[perl #53238]
+blead change 33749
+
+From: David Dick <perlbug-followup@perl.org>
+Date: Tue, 22 Apr 2008 21:12:42 -0700
+Subject: [PATCH] [perl #53238] Patch to stop t/op/fork.t relying on rand
+ From: David Dick (via RT) <perlbug-followup@perl.org>
+ Message-ID: <rt-3.6.HEAD-23612-1208949161-1511.53238-75-0@perl.org>
+
+p4raw-id: //depot/perl@33749
+---
+ t/op/fork.t |    8 +++-----
+ 1 files changed, 3 insertions(+), 5 deletions(-)
+
+diff --git a/t/op/fork.t b/t/op/fork.t
+index 7318449..a19b260 100755
+--- a/t/op/fork.t
++++ b/t/op/fork.t
+@@ -445,16 +445,14 @@ pipe(RDR,WTR) or die $!;
+ my $pid = fork;
+ die "fork: $!" if !defined $pid;
+ if ($pid == 0) {
+-    my $rand_child = rand;
+     close RDR;
+-    print WTR $rand_child, "\n";
++    print WTR "STRING_FROM_CHILD\n";
+     close WTR;
+ } else {
+-    my $rand_parent = rand;
+     close WTR;
+-    chomp(my $rand_child  = <RDR>);
++    chomp(my $string_from_child  = <RDR>);
+     close RDR;
+-    print $rand_child ne $rand_parent, "\n";
++    print $string_from_child eq "STRING_FROM_CHILD", "\n";
+ }
+ EXPECT
+ 1
+-- 
+1.5.6.5
+
--- perl-5.10.0.orig/debian/patches/73_debian_arm_thread_stress_timeout
+++ perl-5.10.0/debian/patches/73_debian_arm_thread_stress_timeout
@@ -0,0 +1,15 @@
+Raise the timeout of ext/threads/shared/t/stress.t to accommodate slower build hosts. (Closes: #501970)
+
+diff --git a/ext/threads/shared/t/stress.t b/ext/threads/shared/t/stress.t
+index 93e2311..b137e5c 100644
+--- a/ext/threads/shared/t/stress.t
++++ b/ext/threads/shared/t/stress.t
+@@ -42,7 +42,7 @@ use threads::shared;
+ {
+     my $cnt = 50;
+ 
+-    my $TIMEOUT = 30;
++    my $TIMEOUT = 150;
+ 
+     my $mutex = 1;
+     share($mutex);

Reply to: