[pve-storage.git] / test / run_plugin_tests.pl

#!/usr/bin/perl

use strict;
use warnings;

use TAP::Harness;

my $harness = TAP::Harness->new( { verbosity => -1 });
my $res = $harness->runtests(
    "archive_info_test.pm",
    "parse_volname_test.pm",
    "list_volumes_test.pm",
);

exit -1 if !$res || $res->{failed} || $res->{parse_errors};
Commit	Line	Data
cd554b79 AA	1	#!/usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5
	6	use TAP::Harness;
	7
	8	my $harness = TAP::Harness->new( { verbosity => -1 });
6a27e817 AA	9	my $res = $harness->runtests(
	10	"archive_info_test.pm",
	11	"parse_volname_test.pm",
	12	"list_volumes_test.pm",
	13	);
cd554b79 AA	14
	15	exit -1 if !$res \|\| $res->{failed} \|\| $res->{parse_errors};
	16