From 98ad345e421b22c1633aa043a56922e941c379d4 Mon Sep 17 00:00:00 2001 From: Mark Hindess Date: Mon, 16 Sep 2013 14:04:14 +0100 Subject: [PATCH] Fix broken logic in $ARGV[0] check. --- Build.PL | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Build.PL b/Build.PL index 7fac4c2fe..13cece256 100644 --- a/Build.PL +++ b/Build.PL @@ -130,7 +130,7 @@ if ($missing_prereqs) { if (eval "use App::Prove; 1") { App::Prove->new->run; } - if (!defined $ARGV[0] && $ARGV[0] ne '--gui') { + if (!defined $ARGV[0] || $ARGV[0] ne '--gui') { print "If you also want to use the GUI you can now run `perl Build.PL --gui` to install the required modules.\n"; } }