From: Simon McVittie <smcv@ http://smcv.pseudorandom.co.uk/>
Date: Fri, 28 Aug 2009 14:22:07 +0000 (+0100)
Subject: Force %depends_exact to lower case, fixing incorrect case-sensitivity
X-Git-Tag: 3.1415926~17^2~2
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=2a7f3b91d4fa46a67d04f963785f957563ac0cfc;p=ikiwiki.git

Force %depends_exact to lower case, fixing incorrect case-sensitivity
---

diff --git a/IkiWiki.pm b/IkiWiki.pm
index e4fcf1d6f..8bded8a0e 100644
--- a/IkiWiki.pm
+++ b/IkiWiki.pm
@@ -1751,7 +1751,7 @@ sub add_depends ($$) {
 	if ($pagespec =~ /$config{wiki_file_regexp}/ &&
 		$pagespec !~ /[\s*?()!]/) {
 		# a simple dependency, which can be matched by string eq
-		$depends_exact{$page}{$pagespec} = 1;
+		$depends_exact{$page}{lc $pagespec} = 1;
 		return 1;
 	}
 
diff --git a/IkiWiki/Render.pm b/IkiWiki/Render.pm
index f1ee140db..5367b1309 100644
--- a/IkiWiki/Render.pm
+++ b/IkiWiki/Render.pm
@@ -457,7 +457,7 @@ sub refresh () {
 	if (%rendered || @del || @internal) {
 		my @changed=(keys %rendered, @del);
 
- 		my %changedpages = map { pagename($_) => 1 } @changed;
+ 		my %lcchanged = map { lc(pagename($_)) => 1 } @changed;
  
 		# rebuild dependant pages
 		F: foreach my $f (@$files) {
@@ -466,7 +466,7 @@ sub refresh () {
 
 			if (exists $depends_exact{$p}) {
 				foreach my $d (keys %{$depends_exact{$p}}) {
-					if (exists $changedpages{$d}) {
+					if (exists $lcchanged{$d}) {
 						debug(sprintf(gettext("building %s, which depends on %s"), $f, $d));
 						render($f);
 						$rendered{$f}=1;