winemaker: Correctly process directories containing regexp metacharacters.

This commit is contained in:
Simon C. Ion 2008-12-19 18:23:45 -06:00 committed by Alexandre Julliard
parent 519478e048
commit 7b5cbdb261
1 changed files with 1 additions and 1 deletions

View File

@ -1103,7 +1103,7 @@ sub search_from($$)
my $directory=get_directory_contents $dirname; my $directory=get_directory_contents $dirname;
my $found; my $found;
foreach my $dentry (@$directory) { foreach my $dentry (@$directory) {
if ($dentry =~ /^$component$/i or if ($dentry =~ /^\Q$component\E$/i or
(defined $renamed and $dentry =~ /^$renamed$/i) (defined $renamed and $dentry =~ /^$renamed$/i)
) { ) {
$dirname.="$dentry/"; $dirname.="$dentry/";