UILayoutTool.st
changeset 2533 460098ee1f39
parent 2478 d0ea9b4d0955
child 2794 56fb74312287
--- a/UILayoutTool.st	Mon May 18 12:11:12 2009 +0200
+++ b/UILayoutTool.st	Mon May 18 12:11:38 2009 +0200
@@ -544,13 +544,15 @@
 
     aTypeOrNil notNil ifTrue:[ 
         self class slices findFirst:[:e|
-            e last == aTypeOrNil ifTrue:[name := e first. true]
+            e last == aTypeOrNil 
+                ifTrue:[name := e first. true] 
+                ifFalse:[false].
         ].
         list := Array with:name with: 'Frame'.
     ] ifFalse:[
         (type := UIPainterView layoutType:layoutView) notNil ifTrue:[
             self class slices findFirst:[:e|
-                e last == type ifTrue:[name := e first. true]
+                e last == type ifTrue:[name := e first. true] ifFalse:[false]
             ].
             list := tabList.
             type == #Extent ifTrue:[