summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorDaniel Friesel <derf@derf.homelinux.org>2010-05-13 15:09:22 +0200
committerDaniel Friesel <derf@derf.homelinux.org>2010-05-13 15:09:22 +0200
commit804ad75a067f5d7f1b327da94a31d42f43b78226 (patch)
treeb64ab0a115a55ac06a348b7598f732966dd9bc62 /test
parentb4661dde93b7f23422b7982a4c23d1af581b6e7b (diff)
Die upon invalid options
Diffstat (limited to 'test')
-rw-r--r--test/50-efa.t10
1 files changed, 9 insertions, 1 deletions
diff --git a/test/50-efa.t b/test/50-efa.t
index fa38572..3884874 100644
--- a/test/50-efa.t
+++ b/test/50-efa.t
@@ -2,7 +2,7 @@
use strict;
use warnings;
use 5.010;
-use Test::Command tests => 72;
+use Test::Command tests => 76;
my $efa = 'bin/efa';
my $testarg = "E HBf MH HBf";
@@ -47,6 +47,14 @@ for my $opt (qw/-e --exclude/) {
$cmd->stderr_is_eq($err_exclude);
}
+for my $opt (qw/-m --max-change/) {
+ $cmd = Test::Command->new(cmd => "$efa $opt nan $testarg");
+
+ $cmd->exit_isnt_num(0);
+ $cmd->stdout_is_eq('');
+ # no stderr test - depends on Getopt::Long
+}
+
for my $opt (qw/-P --prefer/) {
$cmd = Test::Command->new(cmd => "$efa $opt invalid $testarg");