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

#!/usr/bin/perl

use strict;
use warnings;

# to ensure consistent ctime values on all systems
$ENV{TZ} = 'UTC';

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",
    "path_to_volume_id_test.pm",
    "get_subdir_test.pm",
    "filesystem_path_test.pm",
    "prune_backups_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
aa738ee3 FG	6	# to ensure consistent ctime values on all systems
	7	$ENV{TZ} = 'UTC';
	8
cd554b79 AA	9	use TAP::Harness;
	10
	11	my $harness = TAP::Harness->new( { verbosity => -1 });
6a27e817 AA	12	my $res = $harness->runtests(
	13	"archive_info_test.pm",
	14	"parse_volname_test.pm",
	15	"list_volumes_test.pm",
e4dbfde3	16	"path_to_volume_id_test.pm",
ddd313c9	17	"get_subdir_test.pm",
2eb7ba26	18	"filesystem_path_test.pm",
8f26b391	19	"prune_backups_test.pm",
6a27e817	20	);
cd554b79 AA	21
cd554b79 AA	22	exit -1 if !$res \|\| $res->{failed} \|\| $res->{parse_errors};