Rev | Line | |
---|
[1045] | 1 | use strict; |
---|
| 2 | use warnings; |
---|
| 3 | use Test::More; |
---|
| 4 | |
---|
| 5 | eval "use Test::Script::Run"; |
---|
| 6 | plan skip_all => 'Test::Script::Run required' if $@; |
---|
| 7 | |
---|
[1072] | 8 | plan tests => 5; |
---|
[1045] | 9 | |
---|
| 10 | run_ok('bin/la-config', "Can launch la-config"); |
---|
| 11 | |
---|
| 12 | run_ok('bin/la-query', "Can launch la-query"); |
---|
| 13 | run_ok('bin/la-query', [ qw(-o group) ], "Can launch la-query"); |
---|
| 14 | run_not_ok('bin/la-query', [ qw(-o nawak) ], "Can launch la-query"); |
---|
| 15 | |
---|
| 16 | run_ok('bin/la-attributes', "Can launch la-attributes"); |
---|
Note: See
TracBrowser
for help on using the repository browser.