diff options
Diffstat (limited to 'test/50-efa.t')
| -rw-r--r-- | test/50-efa.t | 10 |
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"); |