X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/93cd30bc0a882037ae2c65c8d6d3a9dc3d09c899..5a2de27947d084f73fdbbc55028af378f62b42b3:/t/cvs.t diff --git a/t/cvs.t b/t/cvs.t index 9df62334d..2808973be 100755 --- a/t/cvs.t +++ b/t/cvs.t @@ -6,9 +6,19 @@ BEGIN { $dir="/tmp/ikiwiki-test-cvs.$$"; my $cvs=`which cvs`; chomp $cvs; - if (! -x $cvs || ! mkdir($dir)) { + my $cvsps=`which cvsps`; + chomp $cvsps; + if (! -x $cvs || ! -x $cvsps || ! mkdir($dir)) { eval q{ - use Test::More skip_all => "cvs 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" + } } } }