Fix broken logic in $ARGV[0] check.

This commit is contained in:
Mark Hindess 2013-09-16 14:04:14 +01:00
parent c7db2cb10f
commit 98ad345e42

View File

@ -130,7 +130,7 @@ if ($missing_prereqs) {
if (eval "use App::Prove; 1") { if (eval "use App::Prove; 1") {
App::Prove->new->run; 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"; print "If you also want to use the GUI you can now run `perl Build.PL --gui` to install the required modules.\n";
} }
} }