This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Keep verbatim pod in I18N:LT and IO.pm within 80 cols
authorFather Chrysostomos <sprout@cpan.org>
Wed, 10 Aug 2011 01:06:38 +0000 (18:06 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 10 Aug 2011 20:32:34 +0000 (13:32 -0700)
dist/I18N-LangTags/lib/I18N/LangTags.pm
dist/IO/IO.pm
t/porting/known_pod_issues.dat

index 85a4f22..42ff0fc 100644 (file)
@@ -19,7 +19,7 @@ require Exporter;
                );
 %EXPORT_TAGS = ('ALL' => \@EXPORT_OK);
 
-$VERSION = "0.36";
+$VERSION = "0.37";
 
 sub uniq { my %seen; return grep(!($seen{$_}++), @_); } # a util function
 
@@ -579,16 +579,16 @@ tag ("ar") exists.
 
 Examples:
 
-          alternate_language_tags('no-bok')       is ('nb')
-          alternate_language_tags('nb')           is ('no-bok')
-          alternate_language_tags('he')           is ('iw')
-          alternate_language_tags('iw')           is ('he')
-          alternate_language_tags('i-hakka')      is ('zh-hakka', 'x-hakka')
-          alternate_language_tags('zh-hakka')     is ('i-hakka', 'x-hakka')
-          alternate_language_tags('en')           is ()
-          alternate_language_tags('x-mingo-tom')  is ('i-mingo-tom')
-          alternate_language_tags('x-klikitat')   is ('i-klikitat')
-          alternate_language_tags('i-klikitat')   is ('x-klikitat')
+  alternate_language_tags('no-bok')       is ('nb')
+  alternate_language_tags('nb')           is ('no-bok')
+  alternate_language_tags('he')           is ('iw')
+  alternate_language_tags('iw')           is ('he')
+  alternate_language_tags('i-hakka')      is ('zh-hakka', 'x-hakka')
+  alternate_language_tags('zh-hakka')     is ('i-hakka', 'x-hakka')
+  alternate_language_tags('en')           is ()
+  alternate_language_tags('x-mingo-tom')  is ('i-mingo-tom')
+  alternate_language_tags('x-klikitat')   is ('i-klikitat')
+  alternate_language_tags('i-klikitat')   is ('x-klikitat')
 
 This function returns empty-list if given anything other than a formally
 valid language tag.
index d6ccbfb..09143f2 100644 (file)
@@ -7,7 +7,7 @@ use Carp;
 use strict;
 use warnings;
 
-our $VERSION = "1.25_04";
+our $VERSION = "1.25_05";
 XSLoader::load 'IO', $VERSION;
 
 sub import {
@@ -32,8 +32,8 @@ IO - load various IO modules
 
 =head1 SYNOPSIS
 
-    use IO qw(Handle File);  # loads IO modules, here IO::Handle, IO::File
-    use IO;                  # DEPRECATED
+   use IO qw(Handle File); # loads IO modules, here IO::Handle, IO::File
+   use IO;                 # DEPRECATED
 
 =head1 DESCRIPTION
 
index ff1becc..c679af3 100644 (file)
@@ -142,8 +142,6 @@ dist/data-dumper/dumper.pm  ? Should you be using L<...> instead of 1
 dist/extutils-parsexs/lib/perlxs.pod   Verbatim line length including indents exceeds 79 by    4
 dist/extutils-parsexs/lib/perlxstut.pod        Verbatim line length including indents exceeds 79 by    10
 dist/filter-simple/lib/filter/simple.pm        Verbatim paragraph in NAME section      1
-dist/i18n-langtags/lib/i18n/langtags.pm        Verbatim line length including indents exceeds 79 by    2
-dist/io/io.pm  Verbatim line length including indents exceeds 79 by    1
 dist/io/lib/io/socket/inet.pm  Verbatim line length including indents exceeds 79 by    5
 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 79 by    1