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