summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-17 09:36:30 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-17 09:36:30 +0000
commit8e769e8f22d430f90e7e639f9a6f93ef8ddc9704 (patch)
treea3ee3c33a8fd25f4b6e17077d3cfaef5841a520a
parent95da3481af56693d1342a3af963b2e67b38288c0 (diff)
downloaddrakx-8e769e8f22d430f90e7e639f9a6f93ef8ddc9704.tar
drakx-8e769e8f22d430f90e7e639f9a6f93ef8ddc9704.tar.gz
drakx-8e769e8f22d430f90e7e639f9a6f93ef8ddc9704.tar.bz2
drakx-8e769e8f22d430f90e7e639f9a6f93ef8ddc9704.tar.xz
drakx-8e769e8f22d430f90e7e639f9a6f93ef8ddc9704.zip
(_find_imgfile) prevent matching subdirectory (eg: harddrake)
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 3ca2a22bc..64b6fec79 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -582,7 +582,7 @@ sub _find_imgfile {
@extensions or @extensions = qw(.png .xpm);
if ($f !~ m|^/|) {
foreach my $path (icon_paths()) {
- -e "$path/$f$_" and $f = "$path/$f$_" foreach '', @extensions;
+ -f "$path/$f$_" and $f = "$path/$f$_" foreach '', @extensions;
}
}
return $f;