add test case for RSS url munging

[git.ikiwiki.info.git] / t / mercurial.t

diff --git a/t/mercurial.t b/t/mercurial.t
index b64ea8e563a0a0f6a683fa095374712c194a2c38..4918fc76e9a0bb37adecc18ecbf47cc1eba1a795 100755 (executable)
--- a/t/mercurial.t
+++ b/t/mercurial.t
@@ -6,11 +6,14 @@ BEGIN {
        $dir = "/tmp/ikiwiki-test-hg.$$";
        my $hg=`which hg`;
        chomp $hg;
        $dir = "/tmp/ikiwiki-test-hg.$$";
        my $hg=`which hg`;
        chomp $hg;

-       if (! -x $hg || ! mkdir($dir)) {
+       if (! -x $hg) {

                eval q{
                eval q{

-                       use Test::More skip_all => "hg not available or could not make test dir"
+                       use Test::More skip_all => "hg not available"

                }
        }
                }
        }

+       if (! mkdir($dir)) {
+               die $@;
+       }

 }
 use Test::More tests => 11;
 
 }
 use Test::More tests => 11;