From 31de41fa9d6d57d0b719ddf2f0d7e90c9c9cdb6a Mon Sep 17 00:00:00 2001 From: Graham Barr Date: Sat, 14 Nov 2009 09:27:17 -0600 Subject: [PATCH] Release 1.22 --- Changes | 8 ++++++++ MANIFEST | 2 +- lib/List/Util.pm | 2 +- lib/List/Util/PP.pm | 2 +- lib/List/Util/XS.pm | 2 +- lib/Scalar/Util.pm | 2 +- lib/Scalar/Util/PP.pm | 2 +- 7 files changed, 14 insertions(+), 6 deletions(-) diff --git a/Changes b/Changes index 737b94dd..8f71596e 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,11 @@ +1.22 -- Sat Nov 14 09:26:15 CST 2009 + + * silence a compiler warning about an unreferenced local variable [Steve Hay] + * RT#51484 Preserve utf8 flag of string passed to dualvar() + * RT#51454 Check first argument to first/reduce is a code reference + * RT#50528 [PATCH] p_tainted.t fix for VMS [Craig A. Berry] + * RT#48550 fix pure perl looks_like_number not to match non-ascii digits + 1.21 -- Mon May 18 10:32:14 CDT 2009 * Change build system for perl-only install not to need to modify blib diff --git a/MANIFEST b/MANIFEST index e487778b..3aa442c8 100644 --- a/MANIFEST +++ b/MANIFEST @@ -6,7 +6,7 @@ lib/Scalar/Util.pm lib/Scalar/Util/PP.pm ListUtil.xs Makefile.PL -MANIFEST +MANIFEST This list of files multicall.h README t/00version.t diff --git a/lib/List/Util.pm b/lib/List/Util.pm index 426a7a3b..2b51a69d 100644 --- a/lib/List/Util.pm +++ b/lib/List/Util.pm @@ -14,7 +14,7 @@ require Exporter; @ISA = qw(Exporter); @EXPORT_OK = qw(first min max minstr maxstr reduce sum shuffle); -$VERSION = "1.21"; +$VERSION = "1.22"; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; diff --git a/lib/List/Util/PP.pm b/lib/List/Util/PP.pm index 9c08e9e7..425f1c50 100644 --- a/lib/List/Util/PP.pm +++ b/lib/List/Util/PP.pm @@ -13,7 +13,7 @@ require Exporter; @ISA = qw(Exporter); @EXPORT = qw(first min max minstr maxstr reduce sum shuffle); -$VERSION = "1.21"; +$VERSION = "1.22"; $VERSION = eval $VERSION; sub reduce (&@) { diff --git a/lib/List/Util/XS.pm b/lib/List/Util/XS.pm index 01ad27ac..76bf6469 100644 --- a/lib/List/Util/XS.pm +++ b/lib/List/Util/XS.pm @@ -3,7 +3,7 @@ use strict; use vars qw($VERSION); use List::Util; -$VERSION = "1.21"; # FIXUP +$VERSION = "1.22"; # FIXUP $VERSION = eval $VERSION; # FIXUP sub _VERSION { # FIXUP diff --git a/lib/Scalar/Util.pm b/lib/Scalar/Util.pm index db7b20c5..24f146f2 100644 --- a/lib/Scalar/Util.pm +++ b/lib/Scalar/Util.pm @@ -13,7 +13,7 @@ require List::Util; # List::Util loads the XS @ISA = qw(Exporter); @EXPORT_OK = qw(blessed dualvar reftype weaken isweak tainted readonly openhandle refaddr isvstring looks_like_number set_prototype); -$VERSION = "1.21"; +$VERSION = "1.22"; $VERSION = eval $VERSION; unless (defined &dualvar) { diff --git a/lib/Scalar/Util/PP.pm b/lib/Scalar/Util/PP.pm index 55c01815..e94fe86f 100644 --- a/lib/Scalar/Util/PP.pm +++ b/lib/Scalar/Util/PP.pm @@ -16,7 +16,7 @@ use B qw(svref_2object); @ISA = qw(Exporter); @EXPORT = qw(blessed reftype tainted readonly refaddr looks_like_number); -$VERSION = "1.21"; +$VERSION = "1.22"; $VERSION = eval $VERSION; sub blessed ($) {