--- a/TopView.st	Fri Sep 06 17:56:58 2013 +0200
+++ b/TopView.st	Thu Sep 12 10:51:15 2013 +0200
@@ -767,6 +767,14 @@
     "Modified: 20.3.1997 / 22:14:16 / cg"
 !
 
+release
+    keyboardProcessor notNil ifTrue:[
+	keyboardProcessor release.
+	keyboardProcessor := nil.
+    ].
+    super release
+!
+
 initialize
     "initialize the topViews position for the screens center"
 
@@ -803,14 +811,6 @@
 	self unmarkAsUnmappedModalBox.
     ].
     super realize.
-!
-
-release
-    keyboardProcessor notNil ifTrue:[
-	keyboardProcessor release.
-	keyboardProcessor := nil.
-    ].
-    super release
 ! !
 
 !TopView methodsFor:'misc'!
@@ -880,15 +880,6 @@
     ^ height
 !
 
-isActive
-    "true, if I have the focus (w.r.t the windowing system);
-     i.e. if one of my subViews actually has the real focus.
-     With click-to-focus behavior, this is obviously the current application.
-     Use this query with caution, for example, to suppress tooltips for inactive apps."
-
-    ^ windowGroup notNil and:[windowGroup anyViewHasFocus]
-!
-
 isCollapsed
     "ST80 compatibility: return true if the view is not shown (i.e. iconified)"
 
@@ -1452,11 +1443,11 @@
 !TopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.146 2013-03-28 10:32:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.147 2013-09-12 08:51:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.146 2013-03-28 10:32:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.147 2013-09-12 08:51:15 cg Exp $'
 ! !