From: Joey Hess <joey@gnu.kitenet.net>
Date: Mon, 30 Nov 2009 23:05:47 +0000 (-0500)
Subject: fix test suite after bestlink change
X-Git-Tag: 3.20091202~20
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=01c0f533de4f6504df8e762125ec06f8458b1024;p=ikiwiki.git

fix test suite after bestlink change
---

diff --git a/t/bestlink.t b/t/bestlink.t
index 033b80d74..0020a05e2 100755
--- a/t/bestlink.t
+++ b/t/bestlink.t
@@ -11,11 +11,11 @@ sub test ($$$) {
 	my @existing_pages=@{shift()};
 	
 	%IkiWiki::pagecase=();
-	%links=();
+	%pagesources=();
 	$IkiWiki::config{userdir}="foouserdir";
 	foreach my $page (@existing_pages) {
 		$IkiWiki::pagecase{lc $page}=$page;
-		$links{$page}=[];
+		$pagesources{$page}="$page.mdwn";
 	}
 
 	return bestlink($page, $link);
diff --git a/t/pagespec_match.t b/t/pagespec_match.t
index d529106f7..b96947407 100755
--- a/t/pagespec_match.t
+++ b/t/pagespec_match.t
@@ -49,9 +49,13 @@ $links{"bugs/foo"}=[qw{bugs/done}];
 $links{"bugs/done"}=[];
 $links{"bugs/bar"}=[qw{done}];
 $links{"done"}=[];
+$links{"done"}=[];
 $links{"examples/softwaresite/bugs/fails_to_frobnicate"}=[qw{done}];
 $links{"examples/softwaresite/bugs/done"}=[];
 $links{"ook"}=[qw{/blog/tags/foo}];
+foreach my $p (keys %links) {
+	$pagesources{$p}="$p.mdwn";
+}
 
 ok(pagespec_match("foo", "link(bar)"), "link");
 ok(pagespec_match("foo", "link(ba?)"), "glob link");