abort test if cvs prereq perl modules are not available
parent
ef7bddbc36
commit
57a135c92a
8
t/cvs.t
8
t/cvs.t
|
@ -13,6 +13,14 @@ BEGIN {
|
||||||
use Test::More skip_all => "cvs or cvsps not available or could not make test dir"
|
use Test::More skip_all => "cvs or cvsps not available or could not make test dir"
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
foreach my $module ('File::ReadBackwards', 'File::MimeInfo') {
|
||||||
|
eval qq{use $module};
|
||||||
|
if ($@) {
|
||||||
|
eval qq{
|
||||||
|
use Test::More skip_all => "$module not available"
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
}
|
}
|
||||||
use Test::More tests => 12;
|
use Test::More tests => 12;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue