Change 27497 by [EMAIL PROTECTED] on 2006/03/14 16:02:35
Subject: [PATCH] perl @ 27483 fix lib/Pod/Simple/t/corpustest.t to work
on VMS ODS-2
From: Peter Prymmer <[EMAIL PROTECTED]>
Date: Tue, 14 Mar 2006 10:38:00 -0500
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/lib/Pod/Simple/t/corpustest.t#2 edit
Differences ...
==== //depot/perl/lib/Pod/Simple/t/corpustest.t#2 (text) ====
Index: perl/lib/Pod/Simple/t/corpustest.t
--- perl/lib/Pod/Simple/t/corpustest.t#1~26291~ 2005-12-07 03:38:00.000000000
-0800
+++ perl/lib/Pod/Simple/t/corpustest.t 2006-03-14 08:02:35.000000000 -0800
@@ -122,7 +122,9 @@
next if $f =~ /nonesuch/;
- my $outfilename = ($HACK > 1) ? $wouldxml{$f} : "$wouldxml{$f}\.out";
+ # foo.xml.out is not a portable filename. foo.xml_out may be a bit more
portable
+
+ my $outfilename = ($HACK > 1) ? $wouldxml{$f} : "$wouldxml{$f}_out";
if($HACK) {
open OUT, ">$outfilename" or die "Can't write-open $outfilename: $!\n";
binmode(OUT);
End of Patch.
