blob: 8e29544a2ff8cc02016ec00bebd425c7d12b5563 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
--- driver/xscreensaver-getimage-file.orig Tue May 4 20:40:38 2004
+++ driver/xscreensaver-getimage-file Wed May 19 21:39:59 2004
@@ -133,7 +133,7 @@
push @dirs, $file;
$dir_count++;
print STDERR "$progname: found dir $file\n" if ($verbose > 2);
- } elsif (S_ISREG($mode) || S_ISLNK($mode)) {
+ } elsif (S_ISREG($mode) || (-l "$file")) {
if ($file =~ m/[~%\#]$/ || # backup file, or
! ($file =~ m/$good_file_re/io)) { # no image extension
|
