diff options
Diffstat (limited to 't/50-icli.t')
| -rw-r--r-- | t/50-icli.t | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/t/50-icli.t b/t/50-icli.t index 2eafcf5..53fe15a 100644 --- a/t/50-icli.t +++ b/t/50-icli.t @@ -3,7 +3,7 @@ use strict; use warnings; use 5.010; -use Test::Command tests => (19*3); +use Test::Command tests => (20*3); my $icli = 'bin/icli -f t/in/status.dat -c t/in/objects.cache'; @@ -15,6 +15,11 @@ $cmd->exit_is_num(0); $cmd->stdout_is_file('t/out/standard'); $cmd->stderr_is_eq($EMPTY); +$cmd = Test::Command->new(cmd => "$icli -V"); +$cmd->exit_is_num(0); +$cmd->stdout_like(qr{ ^ icli \s version \s \S+ $ }x); +$cmd->stderr_is_eq($EMPTY); + $cmd = Test::Command->new(cmd => "$icli -lh -g local"); $cmd->exit_is_num(0); $cmd->stdout_is_file('t/out/hosts_group_local'); |