diff options
| -rwxr-xr-x | bin/efa | 2 | ||||
| -rw-r--r-- | test/50-efa.t | 12 |
2 files changed, 8 insertions, 6 deletions
@@ -220,7 +220,7 @@ GetOptions( 't|time=s' => \$time, 'to=s{2}' => \@to, 'to-type=s' => \$to_type, - 'version' => sub {print "efa version $version\n"; exit 0}, + 'v|version' => sub {print "efa version $version\n"; exit 0}, 'via=s{2}' => \@via, 'via-type=s' => \$via_type, 'w|walk-speed=s' => \$walk_speed, diff --git a/test/50-efa.t b/test/50-efa.t index 418e17e..c09e582 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 => 48; +use Test::Command tests => 51; my $efa = 'bin/efa'; my $testarg = "E HBf MH HBf"; @@ -86,8 +86,10 @@ for my $opt (qw/-d --date/) { $cmd->stderr_is_eq($err_date); } -$cmd = Test::Command->new(cmd => "$efa --version"); +for my $opt (qw/-v --version/) { + $cmd = Test::Command->new(cmd => "$efa $opt"); -$cmd->exit_is_num(0); -$cmd->stdout_like($re_version); -$cmd->stderr_is_eq(''); + $cmd->exit_is_num(0); + $cmd->stdout_like($re_version); + $cmd->stderr_is_eq(''); +} |