diff --git a/collects/htdp/image.ss b/collects/htdp/image.ss
index 0b51021648..fc11909a07 100644
--- a/collects/htdp/image.ss
+++ b/collects/htdp/image.ss
@@ -17,6 +17,7 @@ plt/collects/tests/mzscheme/htdp-image.ss
          "error.ss")
 
 (provide-primitives
+         image?
          image-width
          image-height
          overlay
diff --git a/collects/htdp/world.ss b/collects/htdp/world.ss
index 3af91a3140..e6c62fb6e9 100644
--- a/collects/htdp/world.ss
+++ b/collects/htdp/world.ss
@@ -71,7 +71,6 @@ Matthew
          mred
          htdp/error
          htdp/image
-         (only-in lang/htdp-beginner image?)
          mrlib/cache-image-snip
          lang/prim
          (for-syntax scheme/base))