disktest: exit with -1 in case of failures

Signed-off-by: Fabian Grünbichler <f.gruenbichler@proxmox.com>

diff --git a/test/run_disk_tests.pl b/test/run_disk_tests.pl
index e50c6f24e3447c83f32bd9e1ef992d9977c617e3..d955a02f93861842b5a2317fbf9b64088bfdcd7b 100755 (executable)
--- a/test/run_disk_tests.pl
+++ b/test/run_disk_tests.pl
@@ -6,5 +6,7 @@ use warnings;
 use TAP::Harness;
 
 my $harness = TAP::Harness->new( { verbosity => -2 });
-$harness->runtests( "disklist_test.pm" );
+my $res = $harness->runtests( "disklist_test.pm" );
+
+exit -1 if $res->{failed};