Keep verbatim pod in File::Spec within 80 cols

diff --git a/dist/Cwd/lib/File/Spec.pm b/dist/Cwd/lib/File/Spec.pm
index 34c527eea2fc1f0302c7d8587924a102716017c1..2d60b89a3c8951f16cf7c72b53727ec93030301f 100644 (file)
--- a/dist/Cwd/lib/File/Spec.pm
+++ b/dist/Cwd/lib/File/Spec.pm
@@ -3,7 +3,7 @@ package File::Spec;
 use strict;
 use vars qw(@ISA $VERSION);
 
-$VERSION = '3.33';
+$VERSION = '3.34';
 $VERSION = eval $VERSION;
 
 my %module = (MacOS   => 'Mac',
@@ -199,8 +199,10 @@ X<splitpath> X<split, path>
 Splits a path in to volume, directory, and filename portions. On systems
 with no concept of volume, returns '' for volume. 
 
-    ($volume,$directories,$file) = File::Spec->splitpath( $path );
-    ($volume,$directories,$file) = File::Spec->splitpath( $path, $no_file );
+    ($volume,$directories,$file) =
+                       File::Spec->splitpath( $path );
+    ($volume,$directories,$file) =
+                       File::Spec->splitpath( $path, $no_file );
 
 For systems with no syntax differentiating filenames from directories, 
 assumes that the last file is a path unless C<$no_file> is true or a

diff --git a/t/porting/known_pod_issues.dat b/t/porting/known_pod_issues.dat
index e953ffa322f3c0425659d9f57168b98342e99919..b67509bcd39d10dc45fc304215af2819208afe91 100644 (file)
--- a/t/porting/known_pod_issues.dat
+++ b/t/porting/known_pod_issues.dat
@@ -136,7 +136,6 @@ dist/bignum/lib/bigint.pm   Apparent broken link    1
 dist/bignum/lib/bignum.pm      Apparent broken link    1
 dist/bignum/lib/bigrat.pm      Apparent broken link    1
 dist/constant/lib/constant.pm  Apparent broken link    2
-dist/cwd/lib/file/spec.pm      Verbatim line length including indents exceeds 80 by    1
 dist/cwd/lib/file/spec/mac.pm  Verbatim line length including indents exceeds 80 by    9
 dist/cwd/lib/file/spec/unix.pm Verbatim line length including indents exceeds 80 by    1
 dist/cwd/lib/file/spec/vms.pm  Verbatim line length including indents exceeds 80 by    1