This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Porting/corecpan.pl -f option doesn't work
authorJan Dubois <jand@activestate.com>
Mon, 25 Jun 2007 16:55:01 +0000 (09:55 -0700)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Tue, 26 Jun 2007 07:22:36 +0000 (07:22 +0000)
From: "Jan Dubois" <jand@activestate.com>
Message-ID: <02a101c7b784$3f79c720$be6d5560$@com>

p4raw-id: //depot/perl@31467

Porting/corecpan.pl

index 1327483..0bf3913 100644 (file)
@@ -32,7 +32,7 @@ sub get_package_details () {
 
 getopts('fhv');
 our $opt_h and usage;
-our $opt_f or !-f $packagefile and get_package_details;
+our $opt_f || !-f $packagefile and get_package_details;
 
 # Load the package details. All of them.
 my %cpanversions;