--- 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