diff options
author | Andreas Guldstrand <andreas.guldstrand@gmail.com> | 2016-05-08 14:00:12 +0200 |
---|---|---|
committer | Andreas Guldstrand <andreas.guldstrand@gmail.com> | 2016-05-08 14:00:12 +0200 |
commit | 3d8501a6278e82cef93e9c6a6905ff40b3a61857 (patch) | |
tree | d446a386e4b253f477686d07ab566bed822fd729 | |
parent | 792adedbbafd688143ea7ce38daa4c991b1c7131 (diff) | |
download | sbotools2-3d8501a6278e82cef93e9c6a6905ff40b3a61857.tar.xz |
22-config.t: Test sboconfig with invalid settings
-rwxr-xr-x | t/22-config.t | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/t/22-config.t b/t/22-config.t new file mode 100755 index 0000000..9f1d48c --- /dev/null +++ b/t/22-config.t @@ -0,0 +1,19 @@ +#!/usr/bin/env perl + +use 5.16.0; +use strict; +use warnings FATAL => 'all'; +use Test::More; +use FindBin '$RealBin'; +use lib $RealBin; +use Test::Sbotools qw/ sboconfig /; + +plan tests => 7; + +sboconfig '-c', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -c\n" }; +sboconfig '-d', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -d\n" }; +sboconfig '-j', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -j\n" }; +sboconfig '-p', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -p\n" }; +sboconfig '-s', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -s\n" }; +sboconfig '-o', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -o\n" }; +sboconfig '-V', 'invalid', { exit => 1, expected => "You have provided an invalid parameter for -V\n" }; |