From: chromatic Date: Fri, 14 Sep 2001 09:44:57 +0000 (-0600) Subject: Re: [ID 20010911.001] Not OK: perl v5.7.2 +DEVEL11978 on X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=020b036fe37260c6d66af6e9bbd10f439a7fb2d1;p=p5sagit%2Fp5-mst-13.2.git Re: [ID 20010911.001] Not OK: perl v5.7.2 +DEVEL11978 on Message-ID: <20010914154936.70059.qmail@onion.perl.org> p4raw-id: //depot/perl@12022 --- diff --git a/lib/ExtUtils/Manifest.t b/lib/ExtUtils/Manifest.t index 5bf82a7..6b43d73 100644 --- a/lib/ExtUtils/Manifest.t +++ b/lib/ExtUtils/Manifest.t @@ -19,7 +19,7 @@ my @files; sub add_file { my ($file, $data) = @_; $data ||= 'foo'; - open( my $T, ">$file") or return; + open( my $T, '>', $file) or return; print $T $data; push @files, $file; }