ImageInspectorView.st
changeset 13766 d2f4defdd705
parent 13297 ea807c25ceb9
child 14349 1639a85ef84a
--- a/ImageInspectorView.st	Thu Jan 16 15:32:36 2014 +0100
+++ b/ImageInspectorView.st	Thu Jan 16 15:32:40 2014 +0100
@@ -44,7 +44,10 @@
 !ImageInspectorView class methodsFor:'defaults'!
 
 defaultTopViewExtent
-    ^ LastExtent ? super defaultExtent
+    |def|
+
+    def := LastExtent ? self defaultExtent.
+    ^ def min:(Screen current usableExtent)
 
     "Created: / 23-10-2007 / 18:58:18 / cg"
 !
@@ -275,10 +278,10 @@
 !ImageInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.28 2013-08-06 08:38:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.29 2014-01-16 14:32:40 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.28 2013-08-06 08:38:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ImageInspectorView.st,v 1.29 2014-01-16 14:32:40 stefan Exp $'
 ! !