Take-two at fixing bug 3410.
This commit is contained in:
parent
c880919466
commit
af2af91300
@ -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]));
|
||||
}
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user