From 09bf3cc8a4450da9d849febe8a86414e0339e324 Mon Sep 17 00:00:00 2001 From: Andreas Guldstrand Date: Thu, 28 Apr 2016 20:30:49 +0200 Subject: 16-clean.t: test sboclean -i --- t/16-clean.t | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 't') diff --git a/t/16-clean.t b/t/16-clean.t index 9e2901d..a9624a1 100755 --- a/t/16-clean.t +++ b/t/16-clean.t @@ -11,7 +11,7 @@ use Test::Sbotools qw/ make_slackbuilds_txt set_distclean set_noclean set_lo sbo use SBO::Lib; use File::Temp 'tempdir'; -plan tests => 12; +plan tests => 14; my $sboname = "nonexistentslackbuild"; my $perf = "/usr/sbo/distfiles/perf.dummy"; @@ -76,3 +76,10 @@ sboclean { exit => 1, expected => "You must specify at least one of -d or -w.\n" # 12: sboclean -d with SBOHOME set set_sbo_home(tempdir(CLEANUP => 1)); sboclean '-d', { exit => 0, expected => "Nothing to do.\n" }; + +# 13-14: sboclean -w -i with TMP set +{ + local $ENV{TMP} = tempdir(CLEANUP => 1); + sboclean qw/ -w -i /, { input => "n", expected => qr!\QRemove $ENV{TMP}/\E.*\Q? [n]\E! }; + sboclean qw/ -w -i /, { input => "y\ny", expected => qr!\QRemove $ENV{TMP}/\E.*\Q? [n]\E! }; +} -- cgit v1.2.3