From 3d8501a6278e82cef93e9c6a6905ff40b3a61857 Mon Sep 17 00:00:00 2001 From: Andreas Guldstrand Date: Sun, 8 May 2016 14:00:12 +0200 Subject: 22-config.t: Test sboconfig with invalid settings --- t/22-config.t | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100755 t/22-config.t 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" }; -- cgit v1.2.3