http://packetstormsecurity.org/UNIX/admin/xscreensaver-4.02.tar.gz

[xscreensaver] / driver / xscreensaver-getimage-file

diff --git a/driver/xscreensaver-getimage-file b/driver/xscreensaver-getimage-file
index 2da17d5958522b907faeff90deed9f1583398441..36de487e0e7d04e608731572b95f375d0cdc3ff7 100755 (executable)
--- a/driver/xscreensaver-getimage-file
+++ b/driver/xscreensaver-getimage-file
@@ -29,7 +29,10 @@ use strict;
 
 use POSIX;
 use Fcntl;
-use Fcntl ':mode';
+
+# use Fcntl ':mode';   # Perl 5.6ism?
+use POSIX ':fcntl_h';  # more portable?
+
 
 my $progname = $0; $progname =~ s@.*/@@g;
 my $version = q{ $Revision: 1.8 $ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/;