The main libvirt-tck script only executes tests using the default (.t) extension. This patch adds .t and .pl as valid extensions using the --ext parameter. This is required to enable storage tests added in commit 97c6a506. --- Build.PL | 2 +- bin/libvirt-tck | 5 +++++ 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/Build.PL b/Build.PL index e682c3a..c93637d 100644 --- a/Build.PL +++ b/Build.PL @@ -29,7 +29,7 @@ sub process_pkgdata_files { my $name = $File::Find::name; if (-d) { $tck_dirs{$name} = []; - } elsif (-f && /\.(t|sh|fwall|xml|dat)$/) { + } elsif (-f && /\.(t|sh|fwall|xml|dat|pl)$/) { push @{$tck_dirs{$dir}}, $name; } }; diff --git a/bin/libvirt-tck b/bin/libvirt-tck index 816234b..6261538 100644 --- a/bin/libvirt-tck +++ b/bin/libvirt-tck @@ -214,6 +214,11 @@ if ($timer) { push @newargv, "--timer"; } +# Run tests ending in both .t and .pl extensions +foreach my $extension ('.t', '.pl') { + push @newargv, "--ext=$extension"; +} + # This env variable is the only way to pass config into # the Sys::Virt::TCK module from here $ENV{LIBVIRT_TCK_CONFIG} = $config; -- 1.8.4.5