diff --git a/basis/images/images.factor b/basis/images/images.factor
index 9f4d14e7bf..5fdc9ee5e9 100644
--- a/basis/images/images.factor
+++ b/basis/images/images.factor
@@ -1,5 +1,6 @@
 ! Copyright (C) 2009 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
+USING: kernel accessors grouping sequences combinators ;
 IN: images
 
 SINGLETONS: BGR RGB BGRA RGBA ABGR ARGB RGBX XRGB BGRX XBGR ;
diff --git a/basis/images/tiff/tiff.factor b/basis/images/tiff/tiff.factor
index c81d052a7f..dd4319a474 100755
--- a/basis/images/tiff/tiff.factor
+++ b/basis/images/tiff/tiff.factor
@@ -276,7 +276,7 @@ ERROR: unknown-component-order ifd ;
     } cleave tiff-image new-image ;
 
 : tiff>image ( image -- image )
-    ifds>> [ >image ] map first ;
+    ifds>> [ ifd>image ] map first ;
 
 : load-tiff ( path -- parsed-tiff )
     binary [