Update Pod-Parser to CPAN version 1.51
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Wed, 25 Jan 2012 09:26:18 +0000 (09:26 +0000)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Wed, 25 Jan 2012 11:10:39 +0000 (11:10 +0000)
  [DELTA]

  25-Jan-2012           Marek Rouchal                        <marekr@cpan.org>
  -----------------------------------------------------------------------------
  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)

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

index c03f4a5..a2e8d2f 100755 (executable)
@@ -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' => {
index 335ceee..25dab19 100644 (file)
@@ -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
index f4f05a0..028a405 100644 (file)
@@ -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;
 
index a2dc0ce..2ed71fa 100644 (file)
@@ -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
 
 #############################################################################
index 584bc6d..3c74d78 100644 (file)
@@ -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
index d54b773..9a6acd6 100644 (file)
@@ -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
 
 #############################################################################
index 828d7bd..300eee5 100644 (file)
@@ -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
 
 #############################################################################
index 8a7068a..d060b27 100644 (file)
@@ -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
index 664e670..03ecc5b 100644 (file)
@@ -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
 
index 8534d9e..8c16609 100644 (file)
@@ -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
index 4e3833c..28d327c 100644 (file)
@@ -117,7 +117,7 @@ L<DB_File> has been upgraded from version 1.824 to version 1.825.
 
 =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