class: ImageInspectorView
authorClaus Gittinger <cg@exept.de>
Wed, 16 Jul 2014 12:30:45 +0200
changeset 14661 4c4fc6cda8cd
parent 14660 39afddf6eea3
child 14662 4fcc2440b6a4
class: ImageInspectorView changed: #inspect:
ImageInspectorView.st
--- a/ImageInspectorView.st	Tue Jul 15 12:05:27 2014 +0200
+++ b/ImageInspectorView.st	Wed Jul 16 12:30:45 2014 +0200
@@ -152,8 +152,9 @@
     |scrollToBottom prevViewOrigin prevImageSize|
 
     prevViewOrigin := imageView viewOrigin.
-    prevImageSize := imageView image extent.
-
+    imageView image notNil ifTrue:[
+        prevImageSize := imageView image extent.
+    ].
     super inspect:anObject.
 "/    imageView image:anObject.
 
@@ -296,10 +297,10 @@
 !ImageInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.34 2014-07-08 21:53:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.35 2014-07-16 10:30:45 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.34 2014-07-08 21:53:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.35 2014-07-16 10:30:45 cg Exp $'
 ! !