In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/7a9b248bd4287aff0152aae161526c23245dc045?hp=919f76a3449f063cc80397cca2b402c89b2e5f07>

- Log -----------------------------------------------------------------
commit 7a9b248bd4287aff0152aae161526c23245dc045
Author: Chris 'BinGOs' Williams <[email protected]>
Date:   Wed Jan 25 11:06:04 2012 +0000

    Update known_pod_issues.dat for x2p/psed

M       t/porting/known_pod_issues.dat

commit c3e5bc54acca7110613b8082845aead396330f74
Author: Chris 'BinGOs' Williams <[email protected]>
Date:   Wed Jan 25 10:59:28 2012 +0000

    Fix pod error in Unicode::UCD

M       lib/Unicode/UCD.pm

commit b34385a668b1275a17bd3e8d94e6c6decb78edf5
Author: Chris 'BinGOs' Williams <[email protected]>
Date:   Wed Jan 25 09:39:20 2012 +0000

    Update DB_File to CPAN version 1.826
    
      [DELTA]
    
      1.826 25 Jan 2012
    
       * t/db-btree.t - fix use of "length @array"
         [RT ##74336]

M       Porting/Maintainers.pl
M       cpan/DB_File/Changes
M       cpan/DB_File/DB_File.pm
M       cpan/DB_File/t/db-btree.t
M       pod/perldelta.pod

commit 0ba19efb0320c86f95c24abdad9fa7a6456463e6
Author: Chris 'BinGOs' Williams <[email protected]>
Date:   Wed Jan 25 09:30:27 2012 +0000

    Revert "Regen known_pod_issues.dat"
    
    This reverts commit 5fa409a90f64110c5708f7141b376e9bdc54fbe2.
    
    Resolved by update of Pod-Parser to version 1.51

M       t/porting/known_pod_issues.dat

commit 1051d5b55e7598ac2977a16131312f8a760a3409
Author: Chris 'BinGOs' Williams <[email protected]>
Date:   Wed Jan 25 09:26:18 2012 +0000

    Update Pod-Parser to CPAN version 1.51
    
      [DELTA]
    
      25-Jan-2012           Marek Rouchal                        
<[email protected]>
      
-----------------------------------------------------------------------------
      Version 1.51
      + CPAN#74271: Pod::Parser should not flag L<text|hyperlink>
        undo change CPAN#47473: L<alt text|URL> _is_ allowed (see discussion on
        pod-people and p5p); confirmed by blead change; references:
        http://code.activestate.com/lists/perl-pod-people/1690/
        http://code.activestate.com/lists/perl-pod-people/1393/
        
http://perl5.git.perl.org/perl.git/commit/f6e963e4dd62b8e3c01b31f4a4dd57e47e104997
      + bump all module versions (except Pod::PlainText) to 1.51
      + update META.yml (thanks rjbs for the hint)

M       Porting/Maintainers.pl
M       cpan/Pod-Parser/lib/Pod/Checker.pm
M       cpan/Pod-Parser/lib/Pod/Find.pm
M       cpan/Pod-Parser/lib/Pod/InputObjects.pm
M       cpan/Pod-Parser/lib/Pod/ParseUtils.pm
M       cpan/Pod-Parser/lib/Pod/Parser.pm
M       cpan/Pod-Parser/lib/Pod/Select.pm
M       cpan/Pod-Parser/lib/Pod/Usage.pm
M       cpan/Pod-Parser/t/pod/poderrs.t
M       cpan/Pod-Parser/t/pod/poderrs.xr
M       pod/perldelta.pod
-----------------------------------------------------------------------

Summary of changes:
 Porting/Maintainers.pl                  |    8 ++++----
 cpan/DB_File/Changes                    |    5 +++++
 cpan/DB_File/DB_File.pm                 |    2 +-
 cpan/DB_File/t/db-btree.t               |    2 +-
 cpan/Pod-Parser/lib/Pod/Checker.pm      |   18 +-----------------
 cpan/Pod-Parser/lib/Pod/Find.pm         |    2 +-
 cpan/Pod-Parser/lib/Pod/InputObjects.pm |    2 +-
 cpan/Pod-Parser/lib/Pod/ParseUtils.pm   |    2 +-
 cpan/Pod-Parser/lib/Pod/Parser.pm       |    2 +-
 cpan/Pod-Parser/lib/Pod/Select.pm       |    2 +-
 cpan/Pod-Parser/lib/Pod/Usage.pm        |    2 +-
 cpan/Pod-Parser/t/pod/poderrs.t         |    2 +-
 cpan/Pod-Parser/t/pod/poderrs.xr        |    1 -
 lib/Unicode/UCD.pm                      |    1 +
 pod/perldelta.pod                       |    4 ++--
 t/porting/known_pod_issues.dat          |   10 ----------
 16 files changed, 22 insertions(+), 43 deletions(-)

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index c03f4a5..b110866 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -511,7 +511,7 @@ use File::Glob qw(:case);
 
     'DB_File' => {
         'MAINTAINER'   => 'pmqs',
-        'DISTRIBUTION' => 'PMQS/DB_File-1.825.tar.gz',
+        'DISTRIBUTION' => 'PMQS/DB_File-1.826.tar.gz',
         'FILES'        => q[cpan/DB_File],
         'EXCLUDED'     => [
             qr{^patches/},
@@ -520,7 +520,7 @@ use File::Glob qw(:case);
                 fallback.xs
                 ),
         ],
-        'UPSTREAM' => undef,
+        'UPSTREAM' => 'cpan',
     },
 
     'DBM_Filter' => {
@@ -1494,9 +1494,9 @@ use File::Glob qw(:case);
 
     'Pod::Parser' => {
         'MAINTAINER' => 'marekr',
-        'DISTRIBUTION' => 'MAREKR/Pod-Parser-1.50.tar.gz',
+        'DISTRIBUTION' => 'MAREKR/Pod-Parser-1.51.tar.gz',
         'FILES'        => q[cpan/Pod-Parser],
-        'UPSTREAM'     => undef,
+        'UPSTREAM'     => 'cpan',
     },
 
     'Pod::Perldoc' => {
diff --git a/cpan/DB_File/Changes b/cpan/DB_File/Changes
index 577ecb2..200ff17 100644
--- a/cpan/DB_File/Changes
+++ b/cpan/DB_File/Changes
@@ -1,3 +1,8 @@
+1.826 25 Jan 2012
+
+   * t/db-btree.t - fix use of "length @array"
+     [RT ##74336]
+
 1.825 24 Jan 2012
 
    * t/db-btree.t - fix use of "length @array"
diff --git a/cpan/DB_File/DB_File.pm b/cpan/DB_File/DB_File.pm
index 4f41f59..6b7dc10 100644
--- a/cpan/DB_File/DB_File.pm
+++ b/cpan/DB_File/DB_File.pm
@@ -165,7 +165,7 @@ our ($db_version, $use_XSLoader, 
$splice_end_array_no_length, $splice_end_array,
 use Carp;
 
 
-$VERSION = "1.825" ;
+$VERSION = "1.826" ;
 $VERSION = eval $VERSION; # needed for dev releases
 
 {
diff --git a/cpan/DB_File/t/db-btree.t b/cpan/DB_File/t/db-btree.t
index 678393b..fb89a40 100644
--- a/cpan/DB_File/t/db-btree.t
+++ b/cpan/DB_File/t/db-btree.t
@@ -566,7 +566,7 @@ sub ArrayCompare
  
     return 0 if @$a != @$b ;
  
-    foreach (1 .. @$a - 1)
+    foreach (0 .. @$a - 1)
     {
         return 0 unless $$a[$_] eq $$b[$_];
     }
diff --git a/cpan/Pod-Parser/lib/Pod/Checker.pm 
b/cpan/Pod-Parser/lib/Pod/Checker.pm
index 335ceee..25dab19 100644
--- a/cpan/Pod-Parser/lib/Pod/Checker.pm
+++ b/cpan/Pod-Parser/lib/Pod/Checker.pm
@@ -11,7 +11,7 @@ package Pod::Checker;
 use strict;
 
 use vars qw($VERSION @ISA @EXPORT %VALID_COMMANDS %VALID_SEQUENCES);
-$VERSION = '1.50';  ## Current version of this package
+$VERSION = '1.51';  ## Current version of this package
 require  5.005;    ## requires this Perl version or later
 
 use Pod::ParseUtils; ## for hyperlinks and lists
@@ -154,14 +154,6 @@ The given link to I<NAME> does not have a matching node in 
the current
 POD. This also happened when a single word node name is not enclosed in
 C<"">.
 
-=item * hyperlink to URL with alt text deprecated in perlpodspec
-
-Absolute hyperlinks with alternative text like
-C<LE<lt>The Perl Home Page|http://www.perl.orgE<gt>> are discouraged in
-L<perlpodspec>. There is a section in L<perlpod> though, which allows this
-option. As L<perlpodspec> is the more modern document containing the essence
-of many prior discussions, L<Pod::Checker> flags this as an error.
-
 =item * Unknown command "I<CMD>"
 
 An invalid POD command has been found. Valid are C<=head1>, C<=head2>,
@@ -807,14 +799,6 @@ sub end_pod {
                     -msg => "unresolved internal link '$node'"});
             }
         }
-       if($link->type() eq 'hyperlink') {
-            my $alt = $link->alttext();
-            if(defined($alt) && length($alt)) {
-                $self->poderror({ -line => $line || '', -file => $infile,
-                    -severity => 'ERROR',
-                    -msg => "hyperlink to URL with alt text deprecated in 
perlpodspec"});
-           }
-        }
     }
 
     # check the internal nodes for uniqueness. This pertains to
diff --git a/cpan/Pod-Parser/lib/Pod/Find.pm b/cpan/Pod-Parser/lib/Pod/Find.pm
index f4f05a0..028a405 100644
--- a/cpan/Pod-Parser/lib/Pod/Find.pm
+++ b/cpan/Pod-Parser/lib/Pod/Find.pm
@@ -14,7 +14,7 @@ package Pod::Find;
 use strict;
 
 use vars qw($VERSION);
-$VERSION = '1.50';   ## Current version of this package
+$VERSION = '1.51';   ## Current version of this package
 require  5.005;   ## requires this Perl version or later
 use Carp;
 
diff --git a/cpan/Pod-Parser/lib/Pod/InputObjects.pm 
b/cpan/Pod-Parser/lib/Pod/InputObjects.pm
index a2dc0ce..2ed71fa 100644
--- a/cpan/Pod-Parser/lib/Pod/InputObjects.pm
+++ b/cpan/Pod-Parser/lib/Pod/InputObjects.pm
@@ -12,7 +12,7 @@ package Pod::InputObjects;
 use strict;
 
 use vars qw($VERSION);
-$VERSION = '1.50';  ## Current version of this package
+$VERSION = '1.51';  ## Current version of this package
 require  5.005;    ## requires this Perl version or later
 
 #############################################################################
diff --git a/cpan/Pod-Parser/lib/Pod/ParseUtils.pm 
b/cpan/Pod-Parser/lib/Pod/ParseUtils.pm
index 584bc6d..3c74d78 100644
--- a/cpan/Pod-Parser/lib/Pod/ParseUtils.pm
+++ b/cpan/Pod-Parser/lib/Pod/ParseUtils.pm
@@ -11,7 +11,7 @@ package Pod::ParseUtils;
 use strict;
 
 use vars qw($VERSION);
-$VERSION = '1.50'; ## Current version of this package
+$VERSION = '1.51'; ## Current version of this package
 require  5.005;    ## requires this Perl version or later
 
 =head1 NAME
diff --git a/cpan/Pod-Parser/lib/Pod/Parser.pm 
b/cpan/Pod-Parser/lib/Pod/Parser.pm
index d54b773..9a6acd6 100644
--- a/cpan/Pod-Parser/lib/Pod/Parser.pm
+++ b/cpan/Pod-Parser/lib/Pod/Parser.pm
@@ -12,7 +12,7 @@ use strict;
 
 ## These "variables" are used as local "glob aliases" for performance
 use vars qw($VERSION @ISA %myData %myOpts @input_stack);
-$VERSION = '1.50';  ## Current version of this package
+$VERSION = '1.51';  ## Current version of this package
 require  5.005;    ## requires this Perl version or later
 
 #############################################################################
diff --git a/cpan/Pod-Parser/lib/Pod/Select.pm 
b/cpan/Pod-Parser/lib/Pod/Select.pm
index 828d7bd..300eee5 100644
--- a/cpan/Pod-Parser/lib/Pod/Select.pm
+++ b/cpan/Pod-Parser/lib/Pod/Select.pm
@@ -11,7 +11,7 @@ package Pod::Select;
 use strict;
 
 use vars qw($VERSION @ISA @EXPORT $MAX_HEADING_LEVEL %myData @section_headings 
@selected_sections);
-$VERSION = '1.50'; ## Current version of this package
+$VERSION = '1.51'; ## Current version of this package
 require  5.005;    ## requires this Perl version or later
 
 #############################################################################
diff --git a/cpan/Pod-Parser/lib/Pod/Usage.pm b/cpan/Pod-Parser/lib/Pod/Usage.pm
index 8a7068a..d060b27 100644
--- a/cpan/Pod-Parser/lib/Pod/Usage.pm
+++ b/cpan/Pod-Parser/lib/Pod/Usage.pm
@@ -11,7 +11,7 @@ package Pod::Usage;
 use strict;
 
 use vars qw($VERSION @ISA @EXPORT);
-$VERSION = '1.50';  ## Current version of this package
+$VERSION = '1.51';  ## Current version of this package
 require  5.005;    ## requires this Perl version or later
 
 =head1 NAME
diff --git a/cpan/Pod-Parser/t/pod/poderrs.t b/cpan/Pod-Parser/t/pod/poderrs.t
index 664e670..03ecc5b 100644
--- a/cpan/Pod-Parser/t/pod/poderrs.t
+++ b/cpan/Pod-Parser/t/pod/poderrs.t
@@ -119,7 +119,7 @@ L<oho   >
 L<"Warnings"> this one is ok
 L</unescaped> ok too, this POD has an X of the same name
 L<http://www.perl.org> this is OK
-L<The Perl Home Page|http://www.perl.org> this is not OK
+L<The Perl Home Page|http://www.perl.org> this is also OK
 
 =head2 Warnings
 
diff --git a/cpan/Pod-Parser/t/pod/poderrs.xr b/cpan/Pod-Parser/t/pod/poderrs.xr
index 8534d9e..8c16609 100644
--- a/cpan/Pod-Parser/t/pod/poderrs.xr
+++ b/cpan/Pod-Parser/t/pod/poderrs.xr
@@ -50,5 +50,4 @@
 *** ERROR: unresolved internal link 'end with begin' at line 109 in file 
t/pod/poderrs.t
 *** ERROR: unresolved internal link 'OoPs' at line 110 in file t/pod/poderrs.t
 *** ERROR: unresolved internal link 'abc def' at line 114 in file 
t/pod/poderrs.t
-*** ERROR: hyperlink to URL with alt text deprecated in perlpodspec at line 
122 in file t/pod/poderrs.t
 *** ERROR: unresolved internal link 'I/O Operators' at line 213 in file 
t/pod/poderrs.t
diff --git a/lib/Unicode/UCD.pm b/lib/Unicode/UCD.pm
index 17b4fea..6a966f7 100644
--- a/lib/Unicode/UCD.pm
+++ b/lib/Unicode/UCD.pm
@@ -106,6 +106,7 @@ you want a code point to be interpreted as a hexadecimal 
number, you must
 prefix it with either C<0x> or C<U+>, because a string like e.g. C<123> will be
 interpreted as a decimal code point.  Note that the largest code point in
 Unicode is U+10FFFF.
+
 =cut
 
 my $BLOCKSFH;
diff --git a/pod/perldelta.pod b/pod/perldelta.pod
index 4e3833c..bff6b17 100644
--- a/pod/perldelta.pod
+++ b/pod/perldelta.pod
@@ -113,11 +113,11 @@ XXX
 
 =item *
 
-L<DB_File> has been upgraded from version 1.824 to version 1.825.
+L<DB_File> has been upgraded from version 1.824 to version 1.826.
 
 =item *
 
-L<Pod::Parser> has been upgraded from version 1.37 to version 1.50.
+L<Pod::Parser> has been upgraded from version 1.37 to version 1.51.
 
 =back
 
diff --git a/t/porting/known_pod_issues.dat b/t/porting/known_pod_issues.dat
index 0b40ded..4f1cea6 100644
--- a/t/porting/known_pod_issues.dat
+++ b/t/porting/known_pod_issues.dat
@@ -173,7 +173,6 @@ dist/storable/storable.pm   Verbatim line length including 
indents exceeds 79 by    4
 dist/term-readline/lib/term/readline.pm        Verbatim line length including 
indents exceeds 79 by    1
 dist/thread-queue/lib/thread/queue.pm  Verbatim line length including indents 
exceeds 79 by    4
 dist/threads/lib/threads.pm    Verbatim line length including indents exceeds 
79 by    3
-dist/threads/lib/threads.pm    hyperlink to URL with alt text deprecated in 
perlpodspec        1
 dist/tie-file/lib/tie/file.pm  Verbatim line length including indents exceeds 
79 by    3
 dist/tie-file/lib/tie/file.pm  unresolved internal link        1
 ext/b/b/concise.pm     Verbatim line length including indents exceeds 79 by    
1
@@ -226,13 +225,11 @@ pod/perlembed.pod Verbatim line length including indents 
exceeds 79 by    27
 pod/perlfunc.pod       There is more than one target   1
 pod/perlfunc.pod       Verbatim line length including indents exceeds 79 by    
167
 pod/perlgit.pod        Verbatim line length including indents exceeds 79 by    
14
-pod/perlgit.pod        hyperlink to URL with alt text deprecated in 
perlpodspec        2
 pod/perlgpl.pod        Verbatim line length including indents exceeds 79 by    
50
 pod/perlguts.pod       ? Should you be using F<...> or maybe L<...> instead of 
2
 pod/perlguts.pod       ? Should you be using L<...> instead of 1
 pod/perlhack.pod       ? Should you be using L<...> instead of 1
 pod/perlhack.pod       Verbatim line length including indents exceeds 79 by    
1
-pod/perlhack.pod       hyperlink to URL with alt text deprecated in 
perlpodspec        1
 pod/perlhacktips.pod   Verbatim line length including indents exceeds 79 by    
1
 pod/perlhist.pod       Verbatim line length including indents exceeds 79 by    
2
 pod/perlhpux.pod       Verbatim line length including indents exceeds 79 by    
3
@@ -257,7 +254,6 @@ pod/perlnewmod.pod  Verbatim line length including indents 
exceeds 79 by    1
 pod/perlobj.pod        Apparent broken link    1
 pod/perlootut.pod      ? Should you be using F<...> or maybe L<...> instead of 
1
 pod/perlootut.pod      Apparent internal link is missing its forward slash     
16
-pod/perlootut.pod      hyperlink to URL with alt text deprecated in 
perlpodspec        3
 pod/perlop.pod Verbatim line length including indents exceeds 79 by    29
 pod/perlos2.pod        ? Should you be using L<...> instead of 2
 pod/perlos2.pod        Verbatim line length including indents exceeds 79 by    
22
@@ -266,7 +262,6 @@ pod/perlpacktut.pod Verbatim line length including indents 
exceeds 79 by    6
 pod/perlperf.pod       Verbatim line length including indents exceeds 79 by    
154
 pod/perlpodspec.pod    Verbatim line length including indents exceeds 79 by    
9
 pod/perlpodstyle.pod   Verbatim line length including indents exceeds 79 by    
1
-pod/perlre.pod hyperlink to URL with alt text deprecated in perlpodspec        
1
 pod/perlreapi.pod      Verbatim line length including indents exceeds 79 by    
17
 pod/perlrebackslash.pod        Verbatim line length including indents exceeds 
79 by    1
 pod/perlref.pod        Verbatim line length including indents exceeds 79 by    
1
@@ -288,16 +283,13 @@ pod/perltrap.pod  ? Should you be using F<...> or maybe 
L<...> instead of 1
 pod/perltrap.pod       Verbatim line length including indents exceeds 79 by    
15
 pod/perltru64.pod      ? Should you be using F<...> or maybe L<...> instead of 
1
 pod/perltru64.pod      Verbatim line length including indents exceeds 79 by    
4
-pod/perlunicode.pod    hyperlink to URL with alt text deprecated in 
perlpodspec        3
 pod/perlunifaq.pod     empty section in previous paragraph     1
-pod/perluniintro.pod   hyperlink to URL with alt text deprecated in 
perlpodspec        2
 pod/perluniprops.pod   =item type mismatch     6
 pod/perlvar.pod        Verbatim line length including indents exceeds 79 by    
9
 pod/perlvms.pod        ? Should you be using F<...> or maybe L<...> instead of 
1
 pod/perlvms.pod        Verbatim line length including indents exceeds 79 by    
2
 pod/perlwin32.pod      Verbatim line length including indents exceeds 79 by    
12
 porting/epigraphs.pod  Verbatim line length including indents exceeds 79 by    
3
-porting/epigraphs.pod  hyperlink to URL with alt text deprecated in 
perlpodspec        115
 porting/expand-macro.pl        Verbatim line length including indents exceeds 
79 by    2
 porting/how_to_write_a_perldelta.pod   There is no NAME        1
 porting/how_to_write_a_perldelta.pod   Verbatim line length including indents 
exceeds 79 by    3
@@ -312,7 +304,6 @@ vms/ext/filespec.pm Verbatim line length including indents 
exceeds 79 by    1
 x2p/a2p.pod    empty section in previous paragraph     2
 x2p/psed       Spurious =cut command   1
 lib/benchmark.pm       Verbatim line length including indents exceeds 79 by    
4
-lib/charnames.pm       hyperlink to URL with alt text deprecated in 
perlpodspec        1
 lib/class/struct.pm    Verbatim line length including indents exceeds 79 by    
7
 lib/config.pod ? Should you be using L<...> instead of -1
 lib/config.pod nested commands F<...F<...>...> 3
@@ -343,7 +334,6 @@ lib/strict.pm       Verbatim line length including indents 
exceeds 79 by    1
 lib/tie/array.pm       Verbatim line length including indents exceeds 79 by    
1
 lib/tie/hash.pm        Verbatim line length including indents exceeds 79 by    
3
 lib/tie/scalar.pm      Verbatim line length including indents exceeds 79 by    
1
-lib/unicode/ucd.pm     Apparent command =cut not preceded by blank line        
1
 lib/utf8.pm    Verbatim line length including indents exceeds 79 by    4
 lib/version.pod        Verbatim line length including indents exceeds 79 by    
2
 lib/version/internals.pod      Verbatim line length including indents exceeds 
79 by    2

--
Perl5 Master Repository

Reply via email to