summaryrefslogtreecommitdiff
path: root/t/cvs.t
diff options
context:
space:
mode:
Diffstat (limited to 't/cvs.t')
-rwxr-xr-xt/cvs.t7
1 files changed, 5 insertions, 2 deletions
diff --git a/t/cvs.t b/t/cvs.t
index 96359ab6e..5ed377ed5 100755
--- a/t/cvs.t
+++ b/t/cvs.t
@@ -8,11 +8,14 @@ BEGIN {
chomp $cvs;
my $cvsps=`which cvsps`;
chomp $cvsps;
- if (! -x $cvs || ! -x $cvsps || ! mkdir($dir)) {
+ if (! -x $cvs || ! -x $cvsps) {
eval q{
- 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"
}
}
+ if (! mkdir($dir)) {
+ die $@;
+ }
foreach my $module ('File::ReadBackwards', 'File::MimeInfo') {
eval qq{use $module};
if ($@) {