File xscreensaver-s_isdir.patch of Package xscreensaver

--- driver/xscreensaver-getimage-file
+++ driver/xscreensaver-getimage-file
@@ -34,9 +34,6 @@
 
 use Fcntl ':flock'; # import LOCK_* constants
 
-use POSIX ':fcntl_h';				# S_ISDIR was here in Perl 5.6
-import Fcntl ':mode' unless defined &S_ISDIR;	# but it is here in Perl 5.8
-
 use bytes;  # Larry can take Unicode and shove it up his ass sideways.
             # Perl 5.8.0 causes us to start getting incomprehensible
             # errors about UTF-8 all over the place without this.