Take-two at fixing bug 3410.

This commit is contained in:
David Anderson 2008-11-11 02:21:25 -08:00
parent c880919466
commit af2af91300

View File

@ -48,10 +48,10 @@ for ($i = 0; $i <= $#files; $i++)
opendir(DIR, "..\\..\\symstore\\$file");
@subdirs = readdir(DIR);
closedir(DIR);
for ($j = 0; $j < $#subdirs; $j++)
for ($j = 0; $j <= $#subdirs; $j++)
{
next unless ($subdirs[$j] =~ /[A-Z]/);
Build::Command("rename ..\\..\\symstore\\$file\\" . $subdirs[$j] . " ..\\..\\symstore\\$file\\" . lc($subdirs[$j]));
Build::Command("rename ..\\..\\symstore\\$file\\" . $subdirs[$j] . " " . lc($subdirs[$j]));
}
}