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

master
Simon McVittie 2009-08-28 15:22:07 +01:00
parent b6992ec566
commit 2a7f3b91d4
2 changed files with 3 additions and 3 deletions

View File

@ -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;
}

View File

@ -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;