--- a/BrowserView.st	Fri Mar 02 16:04:39 2007 +0100
+++ b/BrowserView.st	Fri Mar 02 16:05:06 2007 +0100
@@ -7845,43 +7845,6 @@
     "Modified: / 30.8.1998 / 22:53:55 / cg"
 !
 
-focusSequence
-    |s|
-
-    s := OrderedCollection new.
-
-    classCategoryListView notNil ifTrue:[
-	s add:classCategoryListView
-    ].
-
-    classListView notNil ifTrue:[
-	s add:classListView
-    ].
-
-"/    variableListView notNil ifTrue:[
-"/        s add:variableListView
-"/    ].
-
-    instanceToggle notNil ifTrue:[
-	s add:instanceToggle.
-    ].
-
-    methodCategoryListView notNil ifTrue:[
-	s add:methodCategoryListView
-    ].
-
-    methodListView notNil ifTrue:[
-	s add:methodListView
-    ].
-
-    classMethodListView notNil ifTrue:[
-	s add:classMethodListView
-    ].
-
-    s add:codeView.
-    ^ s
-!
-
 pullDownMenu
     "return the top (pullDown) menu"
 
@@ -14552,7 +14515,7 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.811 2006-11-24 11:08:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.812 2007-03-02 15:05:06 ca Exp $'
 ! !
 
 BrowserView initialize!