5.005_03 compatible access to SEEK_* constants

diff --git a/SGI/t/20write.t b/SGI/t/20write.t
index 5371f81030c01c0d9ac23b853cfd1d10f92a51da..7a140c3f13e35c1a173aeefee62021c453976f69 100644 (file)
--- a/SGI/t/20write.t
+++ b/SGI/t/20write.t
@@ -3,7 +3,7 @@ use strict;
 use Imager;
 use Test::More tests => 51;
 use Imager::Test qw(test_image test_image_16 is_image);
-use Fcntl ':seek';
+use IO::Seekable;
 
 -d 'testout' or mkdir 'testout';