winemaker: Correctly process directories containing regexp metacharacters.
This commit is contained in:
parent
519478e048
commit
7b5cbdb261
|
@ -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/";
|
||||||
|
|
Loading…
Reference in New Issue