--- a/ImageView.st	Thu Jan 22 15:13:17 1998 +0100
+++ b/ImageView.st	Thu Jan 22 15:14:27 1998 +0100
@@ -189,15 +189,14 @@
     "set the image - show a wait cursor, since image dithering may take a while"
 
     image := anImage.
-    anImage notNil ifTrue:[
-        self cursor:Cursor wait.
-        shown ifTrue:[
-            self clear.
-            self invalidate
-        ].
-        self contentsChanged.
-        self cursor:(Cursor normal).
+
+    self cursor:Cursor wait.
+    shown ifTrue:[
+        self clear.
+        self invalidate
     ].
+    self contentsChanged.
+    self cursor:(Cursor normal).
 
     "
      ImageView new realize image:(Image fromFile:'bitmaps/claus.gif')
@@ -297,5 +296,5 @@
 !ImageView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageView.st,v 1.33 1997-12-18 10:46:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageView.st,v 1.34 1998-01-22 14:14:27 tz Exp $'
 ! !