From 24493e32d8548110c514db9bc09efb5aba276ca5 Mon Sep 17 00:00:00 2001 From: Slack Coder Date: Thu, 28 Nov 2024 09:59:36 -0500 Subject: Set To Do branch --- t/24-unit-sboconfig.t | 25 ------------------------- 1 file changed, 25 deletions(-) delete mode 100755 t/24-unit-sboconfig.t (limited to 't/24-unit-sboconfig.t') 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"); -} -- cgit v1.2.3