diff -r 24564406f7e5 -r 460098ee1f39 UILayoutTool.st
--- 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:[