#imagePreView
authorsr
Thu, 23 Mar 2006 10:50:14 +0100
changeset 2043 a816ef2ce516
parent 2042 963042f2c474
child 2044 830fea482888
#imagePreView '(self componentAt:#imagePreView) subViews' throws exception, because 'subViews' is an empty array at closing the image editor fixed to return nil if subViews isEmptyOrNil
ImageEditor.st
--- a/ImageEditor.st	Mon Mar 20 22:29:49 2006 +0100
+++ b/ImageEditor.st	Thu Mar 23 10:50:14 2006 +0100
@@ -2821,6 +2821,11 @@
 imagePreView
     "returns the preview of the image"
 
+    "subViews is an empty array at closing image Editor"
+    (self componentAt: #imagePreView) subViews isEmptyOrNil ifTrue:[
+        ^ nil
+    ].
+
     ^ (self componentAt: #imagePreView) subViews first 
 ! !