1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
From 6e1b7d3a7109ecf42e99e374e90f997051015c7e Mon Sep 17 00:00:00 2001
From: Christian Loos <cloos@netcologne.de>
Date: Mon, 18 May 2015 16:20:35 +0200
Subject: [PATCH] make --skip work again
8a91645 removed 'skip => 1' from verify() but missed to change the logic
in the cpansign script for the skip option parsing.
---
script/cpansign | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/script/cpansign b/script/cpansign
index ced80b4..e628050 100644
--- a/script/cpansign
+++ b/script/cpansign
@@ -51,7 +51,7 @@ my $cmd = $cmd{substr($op, 0, 1)};
(system("perldoc $0"), exit) if $cmd eq 'help';
my @args;
push @args, (overwrite => '1') if $cmd eq 'sign';
-push @args, (skip => '0') unless grep /^-?-?skip/, @ARGV;
+push @args, (skip => '1') if grep /^-?-?skip/, @ARGV;
if (my $sub = Module::Signature->can($cmd)) {
if (@ARGV and -e $ARGV[-1]) {
--
2.1.4
|
