[perl.git] branch blead, updated. v5.14.0-240-g65cb9c6

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit 65cb9c6e43e223c034d3da09823edc6e436a0680
Author: Father Chrysostomos 
Date:   Fri May 20 22:08:42 2011 -0700

Revert "Revert "Missing bug number in d12b49d""

This reverts commit d3ec9850d2a0f2f5466e207dcc612dc4dc31.

M   dist/constant/lib/constant.pm

commit 6ee65224aedb84644f355c13980564ff5f0a6dfd
Author: Father Chrysostomos 
Date:   Fri May 20 22:07:50 2011 -0700

Increase constant’s version
in preparation for the next commit

M   dist/constant/lib/constant.pm
---

Summary of changes:
 dist/constant/lib/constant.pm |4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/dist/constant/lib/constant.pm b/dist/constant/lib/constant.pm
index 22566ce..085ce46 100644
--- a/dist/constant/lib/constant.pm
+++ b/dist/constant/lib/constant.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings::register;
 
 use vars qw($VERSION %declared);
-$VERSION = '1.21';
+$VERSION = '1.22';
 
 #===
 
@@ -117,7 +117,7 @@ sub import {
if ($multiple || @_ == 1) {
my $scalar = $multiple ? $constants->{$name} : $_[0];
 
-   # Work around perl bug #x: Sub names (actually glob
+   # Work around perl bug #31991: Sub names (actually glob
# names in general) ignore the UTF8 flag. So we have to
# turn it off to get the "right" symbol table entry.
utf8::is_utf8 $name and utf8::encode $name;

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-238-g9efb5c7

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit 9efb5c72cc32d3071e0aabf8f31a9d251c8b467a
Author: Father Chrysostomos 
Date:   Fri May 20 22:06:35 2011 -0700

Move an assert

Due to my own sloppy editing, this assert ending up doing nothing,
as perl would already have crashed before reaching it.
---

Summary of changes:
 gv.c |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/gv.c b/gv.c
index d22a439..72cc9f6 100644
--- a/gv.c
+++ b/gv.c
@@ -960,6 +960,7 @@ Perl_gv_stashpvn(pTHX_ const char *name, U32 namelen, I32 
flags)
return NULL;
 stash = GvHV(tmpgv);
 if (!(flags & ~GV_NOADD_MASK) && !stash) return NULL;
+assert(stash);
 if (!HvNAME_get(stash)) {
hv_name_set(stash, name, namelen, 0);

@@ -969,7 +970,6 @@ Perl_gv_stashpvn(pTHX_ const char *name, U32 namelen, I32 
flags)
if (HvAUX(GvSTASH(tmpgv))->xhv_name_count)
mro_package_moved(stash, NULL, tmpgv, 1);
 }
-assert(stash);
 return stash;
 }
 

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-237-gf8c2016

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit f8c20169be63d7c730cfc7dfc138b0b0b912db4c
Author: Father Chrysostomos 
Date:   Fri May 20 20:29:46 2011 -0700

What’s wrong with me?
---

Summary of changes:
 dist/B-Deparse/t/core.t |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/dist/B-Deparse/t/core.t b/dist/B-Deparse/t/core.t
index adf44c6..9c832c6 100644
--- a/dist/B-Deparse/t/core.t
+++ b/dist/B-Deparse/t/core.t
@@ -35,7 +35,7 @@ my @nary = (
   setprotoent shift sin sleep sprintf splice sqrt
   srand stat system tell tied telldir uc utime umask
   unpack unlink unshift untie ucfirst values warn write )],
- # binary, but not circumfix
+ # binary, but not infix
  [qw( atan2 accept bind binmode chop chomp chmod chown crypt
   connect die exec flock formline getpriority gethostbyaddr
   getnetbyaddr getservbyname getservbyport index join kill

--
Perl5 Master Repository

[perl.git] branch sprout/5.14.1-85026, deleted. v5.14.0-2-g5f6a568

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch sprout/5.14.1-85026 has been deleted



   was  5f6a568496a9fb86f9884c3d81d3514670614a61

---
5f6a568496a9fb86f9884c3d81d3514670614a61 [perl #85026] deleting elements in a 
HASH iterator
---

--
Perl5 Master Repository

[perl.git] branch sprout/5.14.1-89896, deleted. v5.14.0-3-g650279c

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch sprout/5.14.1-89896 has been deleted



   was  650279c51bce9039a732d0ede4caa7ff4f2f84ad

---
650279c51bce9039a732d0ede4caa7ff4f2f84ad [perl #89896] Locale::Maketext test 
failure when environment has variable containing unbalanced brackets
---

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-236-g7792b2e

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit 7792b2ee30dc5cef25922e818e52f28489ede813
Author: Father Chrysostomos 
Date:   Fri May 20 16:43:11 2011 -0700

Remove fixed bug from Deparse’s docs
---

Summary of changes:
 dist/B-Deparse/Deparse.pm |8 
 1 files changed, 0 insertions(+), 8 deletions(-)

diff --git a/dist/B-Deparse/Deparse.pm b/dist/B-Deparse/Deparse.pm
index 6ff1c0d..81c918c 100644
--- a/dist/B-Deparse/Deparse.pm
+++ b/dist/B-Deparse/Deparse.pm
@@ -4869,14 +4869,6 @@ from the Perl core to fix.
 
 =item *
 
-If a keyword is over-ridden, and your program explicitly calls
-the built-in version by using CORE::keyword, the output of B::Deparse
-will not reflect this. If you run the resulting code, it will call
-the over-ridden version rather than the built-in one. (Maybe there
-should be an option to B print keyword calls as C.)
-
-=item *
-
 Some constants don't print correctly either with or without B<-d>.
 For instance, neither B::Deparse nor Data::Dumper know how to print
 dual-valued scalars correctly, as in:

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-235-g4a1ac32

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit 4a1ac32e8da9cb91194b4550164470631b836500
Author: Father Chrysostomos 
Date:   Fri May 20 16:40:01 2011 -0700

Make Deparse use CORE:: when necessary

Till now, Deparse has not added CORE:: to built-in keywords, even when
they are overridden by subs.  Now it does.

It was simply a matter of adding a ‘keyword’ sub that looks in the
current stash to determine whether there is a possible override.  And
it only does so for overridable non-infix functions.  It returns the
keyword with CORE:: added to the beginning if necessary.  Various
parts of the code have been modified to call this routine.
---

Summary of changes:
 MANIFEST  |1 +
 dist/B-Deparse/Deparse.pm |   53 +--
 dist/B-Deparse/t/core.t   |  102 +
 3 files changed, 142 insertions(+), 14 deletions(-)
 create mode 100644 dist/B-Deparse/t/core.t

diff --git a/MANIFEST b/MANIFEST
index b139548..bcaa5c6 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -2836,6 +2836,7 @@ dist/base/t/sigdie.t  See if base works with 
SIGDIE
 dist/base/t/version.t  See if base works with versions
 dist/base/t/warnings.t See if base works with warnings
 dist/B-Deparse/Deparse.pm  Compiler Deparse backend
+dist/B-Deparse/t/core.tSee if B::Deparse knows when to use 
CORE::
 dist/B-Deparse/t/deparse.t See if B::Deparse works
 dist/bignum/lib/bigint.pm  bigint
 dist/bignum/lib/bignum.pm  bignum
diff --git a/dist/B-Deparse/Deparse.pm b/dist/B-Deparse/Deparse.pm
index e780ab8..6ff1c0d 100644
--- a/dist/B-Deparse/Deparse.pm
+++ b/dist/B-Deparse/Deparse.pm
@@ -243,7 +243,8 @@ BEGIN {
 #
 # subs_declared
 # keys are names of subs for which we've printed declarations.
-# That means we can omit parentheses from the arguments.
+# That means we can omit parentheses from the arguments. It also means we
+# need to put CORE:: on core functions of the same name.
 #
 # subs_deparsed
 # Keeps track of fully qualified names of all deparsed subs.
@@ -1017,12 +1018,13 @@ sub maybe_parens_unop {
if ($name eq "umask" && $kid =~ /^\d+$/) {
$kid = sprintf("%#o", $kid);
}
-   return "$name($kid)";
+   return $self->keyword($name) . "($kid)";
 } else {
$kid = $self->deparse($kid, 16);
if ($name eq "umask" && $kid =~ /^\d+$/) {
$kid = sprintf("%#o", $kid);
}
+   $name = $self->keyword($name);
if (substr($kid, 0, 1) eq "\cS") {
# use kid's parens
return $name . substr($kid, 1);
@@ -1521,10 +1523,28 @@ sub pp_setstate { pp_nextstate(@_) }
 
 sub pp_unstack { return "" } # see also leaveloop
 
+sub keyword {
+my $self = shift;
+my $name = shift;
+return $name if $name =~ /^CORE::/; # just in case
+if (
+  $name !~ /^(?:chom?p|exec|system)\z/
+   && !defined eval{prototype "CORE::$name"}
+) { return $name }
+if (
+   exists $self->{subs_declared}{$name}
+or
+   exists &{"$self->{curstash}::$name"}
+) {
+   return "CORE::$name"
+}
+return $name;
+}
+
 sub baseop {
 my $self = shift;
 my($op, $cx, $name) = @_;
-return $name;
+return $self->keyword($name);
 }
 
 sub pp_stub {
@@ -1600,7 +1620,7 @@ sub pp_not {
 my $self = shift;
 my($op, $cx) = @_;
 if ($cx <= 4) {
-   $self->pfixop($op, $cx, "not ", 4);
+   $self->pfixop($op, $cx, $self->keyword("not")." ", 4);
 } else {
$self->pfixop($op, $cx, "!", 21);   
 }
@@ -1626,7 +1646,8 @@ sub unop {
 
return $self->maybe_parens_unop($name, $kid, $cx);
 } else {
-   return $name .  ($op->flags & OPf_SPECIAL ? "()" : "");
+   return $self->keyword($name)
+ . ($op->flags & OPf_SPECIAL ? "()" : "");
 }
 }
 
@@ -1951,7 +1972,7 @@ sub pp_last { loopex(@_, "last") }
 sub pp_next { loopex(@_, "next") }
 sub pp_redo { loopex(@_, "redo") }
 sub pp_goto { loopex(@_, "goto") }
-sub pp_dump { loopex(@_, "dump") }
+sub pp_dump { loopex(@_, $_[0]->keyword("dump")) }
 
 sub ftst {
 my $self = shift;
@@ -2284,9 +2305,10 @@ sub listop {
 my(@exprs);
 my $parens = ($cx >= 5) || $self->{'parens'};
 my $kid = $op->first->sibling;
-return $name if null $kid;
+return $self->keyword($name) if null $kid;
 my $first;
 $name = "socketpair" if $name eq "sockpair";
+my $fullname = $self->keyword($name);
 my $proto = prototype("CORE::$name");
 if (defined $proto
&& $proto =~ /^;?\*/
@@ -2310,12 +2332,13 @@ sub listop {
push @exprs, $self->deparse($kid, 6);
 }

[perl.git] branch blead, updated. v5.14.0-234-gb3fdb83

2011-05-20 Thread Karl Williamson 
In perl.git, the branch blead has been updated



- Log -
commit b3fdb838d589962e1c590dffd9540666e53c7e21
Author: Karl Williamson 
Date:   Fri May 20 16:10:29 2011 -0600

podcheck.t: Improve VMS abilities

This should solve many of the problems encountered on VMS.  It does
it by lower-casing file names before comparison.
---

Summary of changes:
 t/porting/known_pod_issues.dat |  222 
 t/porting/podcheck.t   |   48 ++---
 2 files changed, 143 insertions(+), 127 deletions(-)

diff --git a/t/porting/known_pod_issues.dat b/t/porting/known_pod_issues.dat
index 6ae4626..98843c9 100644
--- a/t/porting/known_pod_issues.dat
+++ b/t/porting/known_pod_issues.dat
@@ -121,7 +121,7 @@ wait(2)
 waitpid(3)
 wget(1)
 Win32::Locale
-dist/Attribute-Handlers/lib/Attribute/Handlers.pm  Verbatim line length 
including indents exceeds 80 by19
+dist/attribute-handlers/lib/attribute/handlers.pm  Verbatim line length 
including indents exceeds 80 by19
 dist/base/lib/fields.pmVerbatim line length including indents exceeds 
80 by1
 dist/bignum/lib/bigint.pm  Apparent broken link1
 dist/bignum/lib/bigint.pm  Verbatim line length including indents exceeds 
80 by1
@@ -129,67 +129,67 @@ dist/bignum/lib/bignum.pm Apparent broken link1
 dist/bignum/lib/bignum.pm  Verbatim line length including indents exceeds 
80 by1
 dist/bignum/lib/bigrat.pm  Apparent broken link1
 dist/constant/lib/constant.pm  Apparent broken link2
-dist/Cwd/lib/File/Spec.pm  Verbatim line length including indents exceeds 
80 by1
-dist/Cwd/lib/File/Spec/Mac.pm  Verbatim line length including indents exceeds 
80 by9
-dist/Cwd/lib/File/Spec/Unix.pm Verbatim line length including indents exceeds 
80 by1
-dist/Cwd/lib/File/Spec/VMS.pm  Verbatim line length including indents exceeds 
80 by1
-dist/Cwd/lib/File/Spec/Win32.pmVerbatim line length including indents 
exceeds 80 by1
-dist/Data-Dumper/Dumper.pm ? Should you be using L<...> instead of 1
-dist/Data-Dumper/Dumper.pm Verbatim line length including indents exceeds 
80 by2
-dist/ExtUtils-Install/lib/ExtUtils/Installed.pmVerbatim line length 
including indents exceeds 80 by2
-dist/Filter-Simple/lib/Filter/Simple.pmVerbatim paragraph in NAME 
section  1
-dist/I18N-LangTags/lib/I18N/LangTags.pmVerbatim line length including 
indents exceeds 80 by2
-dist/IO/IO.pm  Verbatim line length including indents exceeds 80 by1
-dist/IO/lib/IO/Socket/INET.pm  Verbatim line length including indents exceeds 
80 by5
-dist/Locale-Maketext/lib/Locale/Maketext.pod   No items in =over / =back list  
1
-dist/Locale-Maketext/lib/Locale/Maketext.pod   Verbatim line length including 
indents exceeds 80 by1
-dist/Locale-Maketext/lib/Locale/Maketext/TPJ13.pod No items in =over / 
=back list  3
-dist/Math-BigInt/lib/Math/BigFloat.pm  Apparent broken link7
-dist/Math-BigInt/lib/Math/BigFloat.pm  Apparent internal link is missing its 
forward slash 6
-dist/Math-BigInt/lib/Math/BigFloat.pm  Verbatim line length including indents 
exceeds 80 by28
-dist/Math-BigInt/lib/Math/BigInt.pmApparent broken link5
-dist/Math-BigInt/lib/Math/BigInt.pmApparent internal link is missing its 
forward slash 7
-dist/Math-BigInt/lib/Math/BigInt.pmVerbatim line length including indents 
exceeds 80 by122
-dist/Math-BigInt/lib/Math/BigInt.pmempty section in previous paragraph 
1
-dist/Math-BigInt/lib/Math/BigInt/CalcEmu.pmApparent broken link1
-dist/Math-BigInt/lib/Math/BigInt/CalcEmu.pmempty section in previous 
paragraph 3
-dist/Math-BigRat/lib/Math/BigRat.pmApparent broken link3
-dist/Math-BigRat/lib/Math/BigRat.pmApparent internal link is missing its 
forward slash 1
-dist/Math-BigRat/lib/Math/BigRat.pmVerbatim line length including indents 
exceeds 80 by7
-dist/Module-CoreList/blib/script/corelist  Verbatim line length including 
indents exceeds 80 by1
-dist/Module-CoreList/lib/Module/CoreList.pmVerbatim line length including 
indents exceeds 80 by4
-dist/Net-Ping/lib/Net/Ping.pm  Verbatim line length including indents exceeds 
80 by2
-dist/Safe/Safe.pm  Verbatim line length including indents exceeds 80 by
1
-dist/Safe/Safe.pm  empty section in previous paragraph 1
-dist/SelfLoader/lib/SelfLoader.pm  Verbatim line length including indents 
exceeds 80 by14
-dist/Storable/Storable.pm  Verbatim line length including indents exceeds 
80 by4
-dist/Thread-Queue/lib/Thread/Queue.pm  Verbatim line length including indents 
exceeds 80 by4
+dist/cwd/lib/f

[perl.git] branch blead, updated. v5.14.0-233-g5d8c42c

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit 5d8c42c2e098c76d4dfa149495457173b15d8ce5
Author: Father Chrysostomos 
Date:   Fri May 20 14:03:41 2011 -0700

Deparse: readpipe with complex expression

readpipe was always being deparse as `...` or qx.

This commit changes it to use the already-existing pure_string routine
to determine whether it can fit in `` first.
---

Summary of changes:
 dist/B-Deparse/Deparse.pm  |5 -
 dist/B-Deparse/t/deparse.t |3 +++
 2 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/dist/B-Deparse/Deparse.pm b/dist/B-Deparse/Deparse.pm
index be2406f..e780ab8 100644
--- a/dist/B-Deparse/Deparse.pm
+++ b/dist/B-Deparse/Deparse.pm
@@ -3834,7 +3834,10 @@ sub pp_backtick {
 # skip pushmark if it exists (readpipe() vs ``)
 my $child = $op->first->sibling->isa('B::NULL')
? $op->first : $op->first->sibling;
-return single_delim("qx", '`', $self->dq($child));
+if ($self->pure_string($child)) {
+   return single_delim("qx", '`', $self->dq($child, 1));
+}
+unop($self, @_, "readpipe");
 }
 
 sub dquote {
diff --git a/dist/B-Deparse/t/deparse.t b/dist/B-Deparse/t/deparse.t
index dcb18ba..802c31f 100644
--- a/dist/B-Deparse/t/deparse.t
+++ b/dist/B-Deparse/t/deparse.t
@@ -702,3 +702,6 @@ glob('a,');
 each $@;
 keys $~;
 values $!;
+
+# readpipe with complex expression
+readpipe $a + $b;

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-232-g2ff402b

2011-05-20 Thread Karl Williamson 
In perl.git, the branch blead has been updated



- Log -
commit 2ff402b77dbfaa8fc14230271f1a86423a26c0f8
Author: Karl Williamson 
Date:   Fri May 20 10:54:22 2011 -0600

regcomp.c: Another memory leak regression

The reference count should be decremented upon freeing.
---

Summary of changes:
 regcomp.c |1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/regcomp.c b/regcomp.c
index a1183d5..d2a60fa 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5980,6 +5980,7 @@ S_invlist_destroy(pTHX_ HV* const invlist)
UV *list = INT2PTR(UV *, SvUV(*list_ptr)); /* PERL_POISON needs lvalue 
*/
Safefree(list);
 }
+SvREFCNT_dec(invlist);
 }
 
 STATIC void

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-231-g09dcfa7

2011-05-20 Thread Father Chrysostomos 
In perl.git, the branch blead has been updated



- Log -
commit 09dcfa7d12b25dc89ac02dc0f060ecc80d0335b2
Author: Father Chrysostomos 
Date:   Fri May 20 09:28:51 2011 -0700

[perl #91008] Deparse doesn't like each $ref
---

Summary of changes:
 dist/B-Deparse/Deparse.pm  |1 +
 dist/B-Deparse/t/deparse.t |5 +
 2 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/dist/B-Deparse/Deparse.pm b/dist/B-Deparse/Deparse.pm
index 169096c..be2406f 100644
--- a/dist/B-Deparse/Deparse.pm
+++ b/dist/B-Deparse/Deparse.pm
@@ -1659,6 +1659,7 @@ sub pp_chr { maybe_targmy(@_, \&unop, "chr") }
 sub pp_each { unop(@_, "each") }
 sub pp_values { unop(@_, "values") }
 sub pp_keys { unop(@_, "keys") }
+{ no strict 'refs'; *{"pp_r$_"} = *{"pp_$_"} for qw< keys each values >; }
 sub pp_boolkeys { 
 # no name because its an optimisation op that has no keyword
 unop(@_,"");
diff --git a/dist/B-Deparse/t/deparse.t b/dist/B-Deparse/t/deparse.t
index c3301a5..dcb18ba 100644
--- a/dist/B-Deparse/t/deparse.t
+++ b/dist/B-Deparse/t/deparse.t
@@ -697,3 +697,8 @@ tr/\x{345}/\x{370}/;
 
 # [perl #90898]
 glob('a,');
+
+# [perl #91008]
+each $@;
+keys $~;
+values $!;

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-230-gf142daa

2011-05-20 Thread Steffen Mueller 
In perl.git, the branch blead has been updated



- Log -
commit f142daa8b17269bfbcac6c027b3bb378d3f1368f
Author: Steffen Mueller 
Date:   Fri May 20 17:57:50 2011 +0200

Bump Attribute::Handlers version to 0.91

... to match the CPAN version.

No functional changes.

M   Porting/Maintainers.pl
M   dist/Attribute-Handlers/Changes
M   dist/Attribute-Handlers/lib/Attribute/Handlers.pm

commit 7e4175263ac327ba864a8df30193d1b53e566518
Author: Steffen Mueller 
Date:   Fri May 20 17:54:48 2011 +0200

Bump/upgrade Filter::Simple version to 0.87

... to match CPAN release.

No functional changes.

M   Porting/Maintainers.pl
M   dist/Filter-Simple/lib/Filter/Simple.pm

commit 49135aa54cde990a648bd4bc0dac37cef0753f11
Author: Steffen Mueller 
Date:   Fri May 20 16:03:07 2011 +0200

Fix skip() usage in tests

It needs to know how many tests to skip. This never failed in
blead since it's perl version dependent.

M   dist/Data-Dumper/t/bugs.t
---

Summary of changes:
 Porting/Maintainers.pl|4 ++--
 dist/Attribute-Handlers/Changes   |8 ++--
 dist/Attribute-Handlers/lib/Attribute/Handlers.pm |6 +++---
 dist/Data-Dumper/t/bugs.t |2 +-
 dist/Filter-Simple/lib/Filter/Simple.pm   |2 +-
 5 files changed, 13 insertions(+), 9 deletions(-)

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index ffac651..d8fc77a 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -214,7 +214,7 @@ use File::Glob qw(:case);
 'Attribute::Handlers' =>
{
'MAINTAINER'=> 'rgarcia',
-   'DISTRIBUTION'  => 'SMUELLER/Attribute-Handlers-0.88.tar.gz',
+   'DISTRIBUTION'  => 'SMUELLER/Attribute-Handlers-0.91.tar.gz',
'FILES' => q[dist/Attribute-Handlers],
'UPSTREAM'  => 'blead',
},
@@ -881,7 +881,7 @@ use File::Glob qw(:case);
 'Filter::Simple' =>
{
'MAINTAINER'=> 'smueller',
-   'DISTRIBUTION'  => 'SMUELLER/Filter-Simple-0.85.tar.gz',
+   'DISTRIBUTION'  => 'SMUELLER/Filter-Simple-0.87.tar.gz',
'FILES' => q[dist/Filter-Simple],
'EXCLUDED'  => [ qw(Makefile.PL),
 qr{^demo/}
diff --git a/dist/Attribute-Handlers/Changes b/dist/Attribute-Handlers/Changes
index eea99c3..477c7f1 100644
--- a/dist/Attribute-Handlers/Changes
+++ b/dist/Attribute-Handlers/Changes
@@ -133,7 +133,7 @@ t Revision history for Perl extension Attribute-Handlers
 - Add resources (bugtracker, ...) section to META.yml
 
 0.86_01Thu Sep 17 10:01:00 CET 2009
-- From perl change 09330df80caf214f375fcf0c04857347e3b17c69 (Zefram):
+   - From perl change 09330df80caf214f375fcf0c04857347e3b17c69 (Zefram):
 
   Fix [perl #66970] Incorrect coderef in MODIFY_CODE_ATTRIBUTES
 
@@ -154,6 +154,10 @@ t Revision history for Perl extension Attribute-Handlers
 0.87   Mon Sep 21 15:55:00 CET 2009
 - Promote to stable release
 
-0.88   Mon Apr  5 16:33:00 CET 2010
+0.88   Mon Apr  5 16:33:00 CET 2010
- Avoid clobbering $_ (perl #74052, LanX)
 
+0.91   Fri May 20 20:00:00 CET 2011
+   - Typo fixes in documentation
+   - POD link fix.
+
diff --git a/dist/Attribute-Handlers/lib/Attribute/Handlers.pm 
b/dist/Attribute-Handlers/lib/Attribute/Handlers.pm
index 73819da..4333155 100644
--- a/dist/Attribute-Handlers/lib/Attribute/Handlers.pm
+++ b/dist/Attribute-Handlers/lib/Attribute/Handlers.pm
@@ -4,7 +4,7 @@ use Carp;
 use warnings;
 use strict;
 use vars qw($VERSION $AUTOLOAD);
-$VERSION = '0.90'; # remember to update version in POD!
+$VERSION = '0.91'; # remember to update version in POD!
 # $DB::single=1;
 
 my %symcache;
@@ -266,8 +266,8 @@ Attribute::Handlers - Simpler definition of attribute 
handlers
 
 =head1 VERSION
 
-This document describes version 0.90 of Attribute::Handlers,
-released April 5, 2010.
+This document describes version 0.91 of Attribute::Handlers,
+released May 20, 2011.
 
 =head1 SYNOPSIS
 
diff --git a/dist/Data-Dumper/t/bugs.t b/dist/Data-Dumper/t/bugs.t
index b7b32fc..73d18c0 100644
--- a/dist/Data-Dumper/t/bugs.t
+++ b/dist/Data-Dumper/t/bugs.t
@@ -81,7 +81,7 @@ doh('fixed');
 ok(1, "[perl #56766]"); # Still no core dump? We are fine.
 
 SKIP: {
- skip "perl 5.10.1 crashes and DD cannot help it" if $] < 5.011;
+ skip "perl 5.10.1 crashes and DD cannot help it", 1 if $] < 5.011;
  # [perl #72332] Segfault on empty-string glob
  Data::Dumper->Dump([*{*STDERR{IO}}]);
  ok("ok", #ok
diff --git a/dist/Filter-Simple/lib/Filter/Simple.pm 
b/dist/Filter-Simple/lib/Filter/Simple.pm
index 2edd798..2cfa99a 100644
-

[perl.git] branch blead, updated. v5.14.0-227-gece9ad2

2011-05-20 Thread Karl Williamson 
In perl.git, the branch blead has been updated



- Log -
commit ece9ad29e93f08cdb36e63f99da7ef1f49837e52
Author: Karl Williamson 
Date:   Fri May 20 08:27:02 2011 -0600

podcheck.t: Fully qualify carp call from package

M   t/porting/podcheck.t

commit 2497e1dfd128629c4e32897343c724889bf13b43
Author: Karl Williamson 
Date:   Thu May 19 21:31:35 2011 -0600

podcheck.t: Deal properly with -1 counts

These counts are for things like perltoc which are compendiums of other
pods, and so contain any errors in those other pods, which should be
output with the offending pod and not perltoc.  By setting the counts of
errors to a negative in the db, the message for perltoc is suppressed.
But a message was getting improperly output with perltoc when the
original pod got fixed.

M   t/porting/podcheck.t

commit bd3f2f9401e14d1dfc000f7f6b0f188ea43461fa
Author: Karl Williamson 
Date:   Thu May 19 21:10:15 2011 -0600

utf8.c: revise comment

M   utf8.c
---

Summary of changes:
 t/porting/podcheck.t |3 ++-
 utf8.c   |5 +++--
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t
index 999bcb1..f343181 100644
--- a/t/porting/podcheck.t
+++ b/t/porting/podcheck.t
@@ -497,7 +497,7 @@ package My::Pod::Checker {  # Extend Pod::Checker
 }
 }
 
-carp("Couldn't extract line number from $message") if $message =~ 
/line \d+/;
+Carp::carp("Couldn't extract line number from $message") if $message 
=~ /line \d+/;
 push @{$problems{$filename{$addr}}{$message}}, $opts;
 #push @{$problems{$self->get_filename}{$message}}, $opts;
 }
@@ -1401,6 +1401,7 @@ foreach my $filename (@files) {
 foreach my $message ( sort keys %{$known_problems{$filename}}) {
 next if $problems{$filename}{$message};
 next if ! $known_problems{$filename}{$message};
+next if $known_problems{$filename}{$message} < 0; # Preserve negs
 my $diagnostic = output_thanks($filename, 
$known_problems{$filename}{$message}, 0, $message);
 push @diagnostics, $diagnostic if $diagnostic;
 }
diff --git a/utf8.c b/utf8.c
index 2c15946..5f0e08c 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2855,8 +2855,9 @@ Perl__swash_inversion_hash(pTHX_ SV* const swash)
 * express the capitalization, for example, of all consecutive
 * letters with a single line: 0061\t007A\t0041 This maps 0061 to
 * 0041, 0062 to 0042, etc.  I (khw) have never understood 'none',
-* and it's not documented, and perhaps not even currently used,
-* but I copied the semantics from swash_get(), just in case */
+* and it's not documented; it appears to be used only in
+* implementing tr//; I copied the semantics from swash_get(), just
+* in case */
if (!none || val < none) {
++val;
}

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-224-g3df5101

2011-05-20 Thread Craig A. Berry 
In perl.git, the branch blead has been updated



- Log -
commit 3df5101b1783b3f7e6ff145a0a810c25c512f8c5
Author: Craig A. Berry 
Date:   Fri May 20 07:36:53 2011 -0500

Filename portability for hash-rt85026.t

File::Temp::tempdir returns a directory in native syntax.  You
can't just paste a file onto that in Unix syntax and expect it
to work.
---

Summary of changes:
 t/op/hash-rt85026.t |   10 ++
 1 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/t/op/hash-rt85026.t b/t/op/hash-rt85026.t
index 61c0fb4..b7d0cc6 100644
--- a/t/op/hash-rt85026.t
+++ b/t/op/hash-rt85026.t
@@ -10,20 +10,22 @@ BEGIN {
 use strict;
 use Devel::Peek;
 use File::Temp qw(tempdir);
+use File::Spec;
 
 my %hash = map +($_ => 1), ("a".."z");
 
 my $tmp_dir = tempdir(CLEANUP => 1);
+my $tmp_file = File::Spec->catfile($tmp_dir, 'dump');
 
 sub riter {
 local *OLDERR;
 open(OLDERR, ">&STDERR") || die "Can't dup STDERR: $!";
-open(STDERR, ">", "$tmp_dir/dump") ||
-die "Could not open '$tmp_dir/dump' for write: $^E";
+open(STDERR, ">", $tmp_file) ||
+die "Could not open '$tmp_file' for write: $^E";
 Dump(\%hash);
 open(STDERR, ">&OLDERR") || die "Can't dup OLDERR: $!";
-open(my $fh, "<", "$tmp_dir/dump") ||
-die "Could not open '$tmp_dir/dump' for read: $^E";
+open(my $fh, "<", $tmp_file) ||
+die "Could not open '$tmp_file' for read: $^E";
 local $/;
 my $dump = <$fh>;
 my ($riter) = $dump =~ /^\s*RITER\s*=\s*(\d+)/m or

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-223-g04718b4

2011-05-20 Thread Tony Cook 
In perl.git, the branch blead has been updated



- Log -
commit 04718b4750d41e3e11d98b8fe58a782f1e1595da
Author: Tony Cook 
Date:   Tue Mar 29 22:15:23 2011 +1100

if List-Util is built statically, depend on $(PERL_EXE) instead of the 
shared library

of course, it could be that these dependencies are as redundant as the
rest.

M   Makefile.SH

commit bd130c4aaff6557745f87cf51eb7acb8abf68500
Author: Tony Cook 
Date:   Tue Mar 29 21:42:48 2011 +1100

remove unused dependency rule generation for Text/ParseWords

1) Text/ParseWords isn't XS, so never appears in dynamic_ext

2) there's no lib/auto/Scalar/Util.$dlext target, the file would be
lib/auto/Scalar/Util/Util.$dlext , but it's built as part of
List-Util, so there's no dependency lib/auto/Scalar/Util/Util.$dlext
anyway.

M   Makefile.SH

commit de4c0096ebdaf46695cc56e6e72c823fc693d433
Author: Tony Cook 
Date:   Tue Mar 29 21:32:52 2011 +1100

handle a static Cwd when generating the deps for x2p/utils

M   Makefile.SH

commit 6c5941c785207c7779c0d0f98546b9e4ada88064
Author: Tony Cook 
Date:   Tue Mar 29 21:04:25 2011 +1100

remove unneeded dependencies against Cwd

these were added because the build process for Encode and SDBM_File
changes directory, invalidating the original "../lib:../../lib"
PERL5LIB.  With buildcustomize.pl they can change directory safely.

M   Makefile.SH
---

Summary of changes:
 Makefile.SH |   26 +-
 1 files changed, 17 insertions(+), 9 deletions(-)

diff --git a/Makefile.SH b/Makefile.SH
index 217a035..83cedb5 100755
--- a/Makefile.SH
+++ b/Makefile.SH
@@ -164,6 +164,16 @@ EOT
;;
 esac
 
+: is Cwd static or dynamic
+static_cwd='define'
+list_util_dep='$(PERL_EXE)'
+for f in $dynamic_ext; do
+   case $f in
+   Cwd) static_cwd='undef' ;;
+   List/Util) list_util_dep=lib/auto/List/Util/Util.$dlext
+   esac
+done
+
 : Prepare dependency lists for Makefile.
 dynamic_list=' '
 dynamic_ext_re="lib/auto/re/re.$dlext"
@@ -176,16 +186,10 @@ for f in $dynamic_ext; do
 
 : Parallel makes reveal that we have some interdependencies
 case $f in
-   Encode) extra_dep="$extra_dep
-$this_target: lib/auto/Cwd/Cwd.$dlext" ;;
Math/BigInt/FastCalc|Devel/NYTProf) extra_dep="$extra_dep
-$this_target: lib/auto/List/Util/Util.$dlext" ;;
+$this_target: $list_util_dep" ;;
Unicode/Normalize) extra_dep="$extra_dep
 $this_target: uni.data" ;;
-   Text/ParseWords) extra_dep="$extra_dep
-$this_target: lib/auto/Scalar/Util.$dlext" ;;
-   SDBM_File) extra_dep="$extra_dep
-$this_target: lib/auto/Cwd/Cwd.$dlext" ;;
 esac
 done
 
@@ -555,11 +559,15 @@ perl$(OBJ_EXT): git_version.h
 # Making utilities and translators require Cwd.  If we have dynamic
 # loading, we only need miniperl and Cwd.$dlext.  If we have static
 # loading, we need to build perl first.
-case "$usedl" in
-define)
+case "$usedl$static_cwd" in
+defineundef)
 util_deps='$(MINIPERL_EXE) $(CONFIGPM) lib/auto/Cwd/Cwd$(DLSUFFIX) FORCE'
  x2p_deps='$(MINIPERL_EXE) $(CONFIGPM) $(dynamic_ext) FORCE'
 ;;
+definedefine)
+util_deps='$(PERL_EXE) $(CONFIGPM) FORCE'
+ x2p_deps='$(PERL_EXE) $(CONFIGPM) $(dynamic_ext) FORCE'
+;;
 *)  util_deps='$(PERL_EXE) $(CONFIGPM) FORCE'
  x2p_deps='$(PERL_EXE) $(CONFIGPM) FORCE'
 ;;

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-219-g98548bd

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch blead has been updated



- Log -
commit 98548bdfb5109f7b89a6cf2546e90d940408fb9b
Author: Nicholas Clark 
Date:   Fri May 20 12:16:57 2011 +0100

Add USE_LOCALE{,_COLLATE,_CTYPE,_NUMERIC} to the output of perl -V

These 4 compile-time options should be reported, as they have affect the
behaviour of the interpreter binary (albeit only in a small area). They 
don't
affect binary compatibility.
---

Summary of changes:
 perl.c |   12 
 1 files changed, 12 insertions(+), 0 deletions(-)

diff --git a/perl.c b/perl.c
index 8e918c2..4dc5bad 100644
--- a/perl.c
+++ b/perl.c
@@ -1706,6 +1706,18 @@ S_Internals_V(pTHX_ CV *cv)
 #  ifdef USE_FAST_STDIO
 " USE_FAST_STDIO"
 #  endif  
+#  ifdef USE_LOCALE
+" USE_LOCALE"
+#  endif
+#  ifdef USE_LOCALE_COLLATE
+" USE_LOCALE_COLLATE"
+#  endif
+#  ifdef USE_LOCALE_CTYPE
+" USE_LOCALE_CTYPE"
+#  endif
+#  ifdef USE_LOCALE_NUMERIC
+" USE_LOCALE_NUMERIC"
+#  endif
 #  ifdef USE_PERL_ATOF
 " USE_PERL_ATOF"
 #  endif  

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-218-g26ec798

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch blead has been updated



- Log -
commit 26ec7981ec2b5ae66dc749c0c24b1d03c54219c5
Author: Nicholas Clark 
Date:   Tue May 17 16:07:17 2011 +0100

Correct comments about B::PV::PVBM.

Original comments, partially incorrect, added in 5a44e503dc748f53 and
f4c3658468ba5234.
---

Summary of changes:
 ext/B/B.xs |   17 +++--
 1 files changed, 11 insertions(+), 6 deletions(-)

diff --git a/ext/B/B.xs b/ext/B/B.xs
index 627f851..f4d5fea 100644
--- a/ext/B/B.xs
+++ b/ext/B/B.xs
@@ -1620,12 +1620,17 @@ PV(sv)
len = 256;
} else if (ix == 2) {
/* This used to read 257. I think that that was buggy - should have
-  been 258. (The "\0", the flags byte, and 256 for the table.  Not
-  that anything anywhere calls this method.  NWC.  */
-   /* Also, the start pointer has always been SvPVX(sv). Surely it
-  should be SvPVX(sv) + SvCUR(sv)?  The code has faithfully been
-  refactored with this behaviour, since PVBM was added in
-  651aa52ea1faa806.  */
+  been 258. (The "\0", the flags byte, and 256 for the table.)
+  The only user of this method is B::Bytecode in B::PV::bsave.
+  I'm guessing that nothing tested the runtime correctness of
+  output of bytecompiled string constant arguments to index (etc).
+
+  Note the start pointer is and has always been SvPVX(sv), not
+  SvPVX(sv) + SvCUR(sv) PVBM was added in 651aa52ea1faa806, and
+  first used by the compiler in 651aa52ea1faa806. It's used to
+  get a "complete" dump of the buffer at SvPVX(), not just the
+  PVBM table. This permits the generated bytecode to "load"
+  SvPVX in "one" hit.  */
p = SvPVX_const(sv);
len = SvCUR(sv) + (SvVALID(sv) ? 256 + PERL_FBM_TABLE_OFFSET : 0);
} else if (ix) {

--
Perl5 Master Repository

[perl.git] branch smoke-me/cmpVERSION, created. v5.14.0-224-ged91e6e

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch smoke-me/cmpVERSION has been created



at  ed91e6e4c91facb6a66b41511482782676be0a7c (commit)

- Log -
commit ed91e6e4c91facb6a66b41511482782676be0a7c
Author: Nicholas Clark 
Date:   Fri May 20 10:37:13 2011 +0100

Restore cmpVERSION.pl's ability to spot differences in XS files.

Since the refactor to use git tags (instead of a second source tree),
cmpVERSION.pl was only spotting differences in XS files if the corresponding
PM file was also modified. If only the XS file was modified, this was going
undetected.

Remove compare_git_file() - if git has already told us that a file differs,
there's no need to duplicate the work of comparison in Perl.

M   Porting/cmpVERSION.pl

commit 2a19d05d6918026b65394b725f9dfd182291b4ec
Author: Nicholas Clark 
Date:   Thu May 19 20:24:14 2011 +0100

Fold Abigail's TAP generation logic back into cmpVERSION.pl

Reduce t/porting/cmp_version.t down to an invocation of cmpVERSION.pl with
--tap.

M   Porting/cmpVERSION.pl
M   t/porting/cmp_version.t

commit 494dba2e73f6bedb6bedf70d8149283c39a33bc8
Author: Nicholas Clark 
Date:   Thu May 19 18:25:36 2011 +0100

Change the -x option of cmpVERSION.pl to exclude upstream ne 'blead'

Previously it was excluding if CPAN were true, which meant that anything
with a DISTRIBUTION was excluded, including files where blead is upstream,
and hence something we should fix.

M   Porting/cmpVERSION.pl

commit 98717dc2c82d1cfcb3ccf415c66f380539911f42
Author: Nicholas Clark 
Date:   Thu May 19 18:00:37 2011 +0100

Pass the git tag to cmpVERSION.pl with a --tag argument.

If no tag is specified, default to git describe --abbrev=0.
(This is David Golden's suggestion, added t/porting/cmp_version.t in
3d92e8b1e4996571)

Eliminate the source_dir command line argument - this is now always assumed 
to
be '.'.

M   Porting/cmpVERSION.pl

commit a7ffdbda42adddfc242531893b2dac9d0f0a0cd6
Author: Nicholas Clark 
Date:   Thu May 19 17:22:43 2011 +0100

Convert cmpVERSION.pl to Getopt::Long from Getopt::Std.

M   Porting/cmpVERSION.pl

commit 152540ee8d000232b14c886fe22c125c13355f01
Author: Nicholas Clark 
Date:   Thu May 19 16:55:06 2011 +0100

Trim the import list from File::Spec::Functions and don't use File::Find.

Most of the vestigial entries were caused by the refactoring to use git in
42e700c91cf83f56. Use File::Spec::Functions::devnull() in place of hard 
coded
values based on $^O.

M   Porting/cmpVERSION.pl

commit fc3a75e7d48f8553e73eb442352d399e339f0de2
Author: Nicholas Clark 
Date:   Thu May 19 16:39:50 2011 +0100

Only load Maintainers.pm if cmpVERSION.pl is invoked with -x

Skip chdir $source_dir with -x, because -x checks that it's '.'

M   Porting/cmpVERSION.pl
---

--
Perl5 Master Repository

[perl.git] branch nicholas/cmpVERSION, created. v5.14.0-224-ged91e6e

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch nicholas/cmpVERSION has been created



at  ed91e6e4c91facb6a66b41511482782676be0a7c (commit)

- Log -
commit ed91e6e4c91facb6a66b41511482782676be0a7c
Author: Nicholas Clark 
Date:   Fri May 20 10:37:13 2011 +0100

Restore cmpVERSION.pl's ability to spot differences in XS files.

Since the refactor to use git tags (instead of a second source tree),
cmpVERSION.pl was only spotting differences in XS files if the corresponding
PM file was also modified. If only the XS file was modified, this was going
undetected.

Remove compare_git_file() - if git has already told us that a file differs,
there's no need to duplicate the work of comparison in Perl.

M   Porting/cmpVERSION.pl

commit 2a19d05d6918026b65394b725f9dfd182291b4ec
Author: Nicholas Clark 
Date:   Thu May 19 20:24:14 2011 +0100

Fold Abigail's TAP generation logic back into cmpVERSION.pl

Reduce t/porting/cmp_version.t down to an invocation of cmpVERSION.pl with
--tap.

M   Porting/cmpVERSION.pl
M   t/porting/cmp_version.t

commit 494dba2e73f6bedb6bedf70d8149283c39a33bc8
Author: Nicholas Clark 
Date:   Thu May 19 18:25:36 2011 +0100

Change the -x option of cmpVERSION.pl to exclude upstream ne 'blead'

Previously it was excluding if CPAN were true, which meant that anything
with a DISTRIBUTION was excluded, including files where blead is upstream,
and hence something we should fix.

M   Porting/cmpVERSION.pl

commit 98717dc2c82d1cfcb3ccf415c66f380539911f42
Author: Nicholas Clark 
Date:   Thu May 19 18:00:37 2011 +0100

Pass the git tag to cmpVERSION.pl with a --tag argument.

If no tag is specified, default to git describe --abbrev=0.
(This is David Golden's suggestion, added t/porting/cmp_version.t in
3d92e8b1e4996571)

Eliminate the source_dir command line argument - this is now always assumed 
to
be '.'.

M   Porting/cmpVERSION.pl

commit a7ffdbda42adddfc242531893b2dac9d0f0a0cd6
Author: Nicholas Clark 
Date:   Thu May 19 17:22:43 2011 +0100

Convert cmpVERSION.pl to Getopt::Long from Getopt::Std.

M   Porting/cmpVERSION.pl

commit 152540ee8d000232b14c886fe22c125c13355f01
Author: Nicholas Clark 
Date:   Thu May 19 16:55:06 2011 +0100

Trim the import list from File::Spec::Functions and don't use File::Find.

Most of the vestigial entries were caused by the refactoring to use git in
42e700c91cf83f56. Use File::Spec::Functions::devnull() in place of hard 
coded
values based on $^O.

M   Porting/cmpVERSION.pl

commit fc3a75e7d48f8553e73eb442352d399e339f0de2
Author: Nicholas Clark 
Date:   Thu May 19 16:39:50 2011 +0100

Only load Maintainers.pm if cmpVERSION.pl is invoked with -x

Skip chdir $source_dir with -x, because -x checks that it's '.'

M   Porting/cmpVERSION.pl
---

--
Perl5 Master Repository

[perl.git] branch smoke-me/cmpVERSION, deleted. v5.14.0-202-gd96637f

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch smoke-me/cmpVERSION has been deleted



   was  d96637f0808d8d99570b1d0733b0dd285c95c078

---
d96637f0808d8d99570b1d0733b0dd285c95c078 Fold Abigail's TAP generation logic 
back into cmpVERSION.pl
---

--
Perl5 Master Repository

[perl.git] branch nicholas/cmpVERSION, deleted. v5.14.0-202-gd96637f

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch nicholas/cmpVERSION has been deleted



   was  d96637f0808d8d99570b1d0733b0dd285c95c078

---
d96637f0808d8d99570b1d0733b0dd285c95c078 Fold Abigail's TAP generation logic 
back into cmpVERSION.pl
---

--
Perl5 Master Repository

[perl.git] branch blead, updated. v5.14.0-217-ge590401

2011-05-20 Thread Nicholas Clark 
In perl.git, the branch blead has been updated



- Log -
commit e5904012f684e4931ecd4a1671a82801d7e57411
Author: Nicholas Clark 
Date:   Fri May 20 10:19:33 2011 +0100

Bump the version of PerlIO::encoding following 1c2e8ccaafb0b2b1.

1c2e8ccaafb0b2b1 fixed a typo in a comment in the XS code.

M   ext/PerlIO-encoding/encoding.pm
M   pod/perldelta.pod

commit daca484d698401314760ddb24f2669780bf9de12
Author: Nicholas Clark 
Date:   Fri May 20 09:49:24 2011 +0100

Bump the versions of B and Storable following 1b95d04f713d9c56.

1b95d04f713d9c56 changed HvKEYS() to HvUSEDKEYS() in the XS code.

M   dist/Storable/Storable.pm
M   ext/B/B.pm
M   pod/perldelta.pod

commit f95396b326aacbc03234633c3e3e6a094c105d5f
Author: Nicholas Clark 
Date:   Fri May 20 09:39:11 2011 +0100

Use L<> rather than C<> in the Updated Modules section of perldelta.

Previous perldeltas have been inconsistent with each other as to whether to
use L<> to C<> (but internally consistent). perldelta5140.pod uses L<>, 
which
is more useful, as it provides a direct link to fuller documentation at the
point where the reader is likely to want to follow it.

Switch the two existing entries from C<> to L<>, and update the perldelta
template to suggest L<>.

M   Porting/perldelta_template.pod
M   pod/perldelta.pod
---

Summary of changes:
 Porting/perldelta_template.pod  |3 ++-
 dist/Storable/Storable.pm   |2 +-
 ext/B/B.pm  |2 +-
 ext/PerlIO-encoding/encoding.pm |2 +-
 pod/perldelta.pod   |   16 ++--
 5 files changed, 19 insertions(+), 6 deletions(-)

diff --git a/Porting/perldelta_template.pod b/Porting/perldelta_template.pod
index 4a6e099..7f9749a 100644
--- a/Porting/perldelta_template.pod
+++ b/Porting/perldelta_template.pod
@@ -96,7 +96,8 @@ XXX
 
 =item *
 
-XXX
+[Verbatim block to avoid creating a bogus link]
+L has been upgraded from version 0.69 to version 0.70.
 
 =back
 
diff --git a/dist/Storable/Storable.pm b/dist/Storable/Storable.pm
index 44b85db..e69b455 100644
--- a/dist/Storable/Storable.pm
+++ b/dist/Storable/Storable.pm
@@ -21,7 +21,7 @@ package Storable; @ISA = qw(Exporter);
 
 use vars qw($canonical $forgive_me $VERSION);
 
-$VERSION = '2.27';
+$VERSION = '2.28';
 
 BEGIN {
 if (eval { local $SIG{__DIE__}; require Log::Agent; 1 }) {
diff --git a/ext/B/B.pm b/ext/B/B.pm
index 063eb40..da20925 100644
--- a/ext/B/B.pm
+++ b/ext/B/B.pm
@@ -15,7 +15,7 @@ require Exporter;
 # walkoptree comes from B.xs
 
 BEGIN {
-$B::VERSION = '1.29';
+$B::VERSION = '1.30';
 @B::EXPORT_OK = ();
 
 # Our BOOT code needs $VERSION set, and will append to @EXPORT_OK.
diff --git a/ext/PerlIO-encoding/encoding.pm b/ext/PerlIO-encoding/encoding.pm
index f7f3f2e..ee3573e 100644
--- a/ext/PerlIO-encoding/encoding.pm
+++ b/ext/PerlIO-encoding/encoding.pm
@@ -1,7 +1,7 @@
 package PerlIO::encoding;
 
 use strict;
-our $VERSION = '0.14';
+our $VERSION = '0.15';
 our $DEBUG = 0;
 $DEBUG and warn __PACKAGE__, " called by ", join(", ", caller), "\n";
 
diff --git a/pod/perldelta.pod b/pod/perldelta.pod
index dc6ee16..e7e1774 100644
--- a/pod/perldelta.pod
+++ b/pod/perldelta.pod
@@ -91,7 +91,11 @@ XXX
 
 =item *
 
-C has been upgraded from version 1.56 to version 1.57.
+L has been upgraded from version 1.29 to version 1.30.
+
+=item *
+
+L has been upgraded from version 1.56 to version 1.57.
 
 Correct copy constructor usage.
 Fix polarwise formatting with numeric format specifier.
@@ -99,7 +103,15 @@ More stable C algorithm.
 
 =item *
 
-C has been upgraded from version 1.9721_01 to version 1.9722.
+L has been upgraded from version 0.14 to 0.15
+
+=item *
+
+L has been upgraded from version 2.27 to version 2.28.
+
+=item *
+
+L has been upgraded from version 1.9721_01 to version 1.9722.
 
 Portability fix, and avoiding some compiler warnings.
 

--
Perl5 Master Repository