diff options
Diffstat (limited to 't/24-unit-sboconfig.t')
-rwxr-xr-x | t/24-unit-sboconfig.t | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/t/24-unit-sboconfig.t b/t/24-unit-sboconfig.t deleted file mode 100755 index ad74469..0000000 --- a/t/24-unit-sboconfig.t +++ /dev/null @@ -1,25 +0,0 @@ -#!/usr/bin/env perl - -use strict; -use warnings; -use Test::More; -use Test::Exit; -use FindBin '$RealBin'; -use lib $RealBin; -use Test::Sbotools qw/ load /; -use Capture::Tiny qw/ capture_merged /; -use File::Temp 'tempdir'; -use Cwd; - -plan tests => 2; - -# 1-2: sboconfig unit tests... -{ - load('sboconfig'); - - my $exit; - my $out = capture_merged { $exit = exit_code { main::config_write(); }; }; - - is ($out, "A fatal script error has occurred:\nconfig_write requires at least two arguments.\nExiting.\n", "sboconfig's config_write() gave correct output"); - is ($exit, 2, "sboconfig's config_write() gave correct exit status"); -} |