class: ImageInspectorView
authorClaus Gittinger <cg@exept.de>
Sun, 30 Jun 2013 23:57:20 +0200
changeset 13077 3cac4b955bbf
parent 13076 254581d2fafc
child 13078 c7668da112d4
class: ImageInspectorView changed: #destroy
ImageInspectorView.st
--- a/ImageInspectorView.st	Sun Jun 30 22:06:12 2013 +0200
+++ b/ImageInspectorView.st	Sun Jun 30 23:57:20 2013 +0200
@@ -162,9 +162,10 @@
     |imageViewsSuperView|
 
     imageViewsSuperView := imageView superView.
-    LastRatio := 1.0 - 
-                 (imageViewsSuperView relativeCorner y - imageViewsSuperView relativeOrigin y).
-
+    imageViewsSuperView notNil ifTrue:[
+        LastRatio := 1.0 - 
+                     (imageViewsSuperView relativeCorner y - imageViewsSuperView relativeOrigin y).
+    ].
     super destroy
 
     "Created: / 07-09-1998 / 13:13:43 / cg"
@@ -259,9 +260,10 @@
 !ImageInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.26 2012-07-25 10:54:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.27 2013-06-30 21:57:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.26 2012-07-25 10:54:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.27 2013-06-30 21:57:20 cg Exp $'
 ! !
+