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 53fe15a..d5a4b65 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 => (20*3); +use Test::Command tests => (21*3); my $icli = 'bin/icli -f t/in/status.dat -c t/in/objects.cache'; @@ -75,6 +75,11 @@ $cmd->exit_is_num(0); $cmd->stdout_is_file('t/out/list_services_single'); $cmd->stderr_is_eq($EMPTY); +$cmd = Test::Command->new(cmd => "$icli -lq"); +$cmd->exit_is_num(0); +$cmd->stdout_is_file('t/out/list_queue'); +$cmd->stderr_is_eq($EMPTY); + $cmd = Test::Command->new(cmd => "$icli -g invalid"); $cmd->exit_isnt_num(0); |