--- a/Image.st	Fri Oct 22 19:03:30 1999 +0200
+++ b/Image.st	Tue Oct 26 19:52:27 1999 +0200
@@ -5001,6 +5001,7 @@
      a device, this will be the receiver. Otherwise, a new image
      is returned."
 
+    aDevice isNil ifTrue:[^ self].
     ^ self on:aDevice
 
     "Created: 28.3.1997 / 16:05:53 / cg"
@@ -11908,6 +11909,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.282 1999-10-06 22:32:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.283 1999-10-26 17:51:50 cg Exp $'
 ! !
 Image initialize!