--- a/WindowBuilder.st	Mon Jan 24 12:07:45 2000 +0100
+++ b/WindowBuilder.st	Mon Jan 24 17:36:19 2000 +0100
@@ -643,9 +643,8 @@
 makeTabable:aComponent
     "add a component to the list of tabable components"
 
-    self focusSequence add:aComponent
+    aComponent canTab:true
 
-    "Modified: / 12.3.1999 / 00:02:24 / cg"
 !
 
 setupWindowFor:aWindow
@@ -1242,5 +1241,5 @@
 !WindowBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.84 2000-01-17 11:19:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.85 2000-01-24 16:36:19 ca Exp $'
 ! !