test for empty layouts
authorca
Wed, 24 Oct 2001 10:55:38 +0200
changeset 2039 176da0a9b13c
parent 2038 81b3b590c9d8
child 2040 702df7addef9
test for empty layouts
MenuPanel.st
--- a/MenuPanel.st	Wed Oct 24 10:52:35 2001 +0200
+++ b/MenuPanel.st	Wed Oct 24 10:55:38 2001 +0200
@@ -4106,9 +4106,11 @@
     isVert := self verticalLayout.
 
     superView notNil ifTrue:[
-        first := items first layout.
-        last  := items last  layout.
-
+        (    (first := items first layout) isNil
+         or:[(last  := items last  layout) isNil]
+        ) ifTrue:[
+            ^ false
+        ].
         isVert ifTrue:[
             ^ first top < 0 or:[last bottom > height]
         ].
@@ -6846,6 +6848,6 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.278 2001-10-10 14:02:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.279 2001-10-24 08:55:38 ca Exp $'
 ! !
 MenuPanel initialize!