From: Jan Dubois <jand@activestate.com>
Date: Mon, 25 Jun 2007 16:55:01 +0000 (-0700)
Subject: Porting/corecpan.pl -f option doesn't work
X-Git-Tag: perl-5.9.5~95
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/c16639b530c8551bfbd92ceea654ab91dfea918a

Porting/corecpan.pl -f option doesn't work
From: "Jan Dubois" <jand@activestate.com>
Message-ID: <02a101c7b784$3f79c720$be6d5560$@com>

p4raw-id: //depot/perl@31467
---

diff --git a/Porting/corecpan.pl b/Porting/corecpan.pl
index 1327483..0bf3913 100644
--- a/Porting/corecpan.pl
+++ b/Porting/corecpan.pl
@@ -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;