--- a/DialogBox.st	Wed Jan 29 14:41:21 1997 +0100
+++ b/DialogBox.st	Sat Feb 01 12:05:45 1997 +0100
@@ -2523,7 +2523,7 @@
     tabableElements isNil ifTrue:[
         tabableElements := OrderedCollection new
     ].
-    tabableElements remove:aComponentOrSubcomponent ifAbsent:nil.
+    tabableElements removeIdentical:aComponentOrSubcomponent ifAbsent:nil.
 
     anotherComponent isNil ifTrue:[
         tabableElements addFirst:aComponentOrSubcomponent
@@ -2535,7 +2535,7 @@
         self addToInputFieldGroup:aComponentOrSubcomponent
     ].
 
-    "Modified: 31.5.1996 / 21:15:11 / cg"
+    "Modified: 1.2.1997 / 12:05:10 / cg"
 !
 
 okAction:aBlock
@@ -5323,6 +5323,6 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.99 1997-01-16 21:02:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.100 1997-02-01 11:05:45 cg Exp $'
 ! !
 DialogBox initialize!