#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
--- 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
! !