X-Git-Url: https://git.stderr.nl/gitweb?p=matthijs%2Fupstream%2Fblosxom.git;a=blobdiff_plain;f=t%2Fdriver;h=c1e9a555064d26b8ae8fc1d6138d7c53fbd849df;hp=52fc128f36725c8f67270a7491d5ecf7fd10ebaa;hb=42ddf87fb0f83ca4b7897e2c3e486c571494d978;hpb=677f2b6b058b1ffea5ebf44dc6131621449514fc

diff --git a/t/driver b/t/driver
index 52fc128..c1e9a55 100644
--- a/t/driver
+++ b/t/driver
@@ -69,7 +69,8 @@ if ($static_password) {
     skip "Static tests require 'expected' directory", 1 unless $expected;
     $expected = "$blosxom_config_dir/../$expected" unless $expected =~ m!^/!;
     skip "Static tests 'expected' directory is missing", 1 unless -d $expected;
-    skip "Static tests 'static_dir' directory is missing", 1 unless -d $static_dir;
+    -d $static_dir or mkdir $static_dir
+      or die "mkdir on static_dir '$static_dir' failed: $!";
 
     File::Remove::remove(\1, "$static_dir/*");
 
@@ -80,7 +81,7 @@ if ($static_password) {
       my ($a_short, $b_short) = ($a, $b);
       $a_short =~ s!^.*\.\./!! if $a_short;
       $b_short =~ s!^.*\.\./!! if $b_short;
-      return if $b =~ m! /CVS$ !x;
+      return if $b && $b =~ m! /CVS$ !x;
       if (! $b) {
         fail("$a_short has no corresponding file");
       } elsif (! $a) {