--- a/StandardSystemView.st	Mon Feb 02 11:31:24 2004 +0100
+++ b/StandardSystemView.st	Mon Feb 02 14:54:17 2004 +0100
@@ -433,18 +433,6 @@
     "
 !
 
-takeFocusWhenMapped:aBoolean
-    "if turned on, topViews will grab the keyboard when mapped.
-     This is useful on systems like openView, where a view needs a click
-     otherwise"
-
-    TakeFocusWhenMapped := aBoolean
-
-    "
-     StandardSystemView takeFocusWhenMapped:true
-    "
-!
-
 updateStyleCache
     "extract values from the styleSheet and cache them in class variables"
 
@@ -1535,7 +1523,7 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.151 2003-08-11 20:04:43 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.152 2004-02-02 13:54:17 ca Exp $'
 ! !
 
 StandardSystemView initialize!

--- a/TopView.st	Mon Feb 02 11:31:24 2004 +0100
+++ b/TopView.st	Mon Feb 02 14:54:17 2004 +0100
@@ -106,6 +106,18 @@
      at the current pointer position"
 
     ForceModalBoxesToOpenAtPointer := aBoolean
+!
+
+takeFocusWhenMapped:aBoolean
+    "if turned on, topViews will grab the keyboard when mapped.
+     This is useful on systems like openView or Win32, where a view needs a click
+     otherwise"
+
+    TakeFocusWhenMapped := aBoolean
+
+    "
+     StandardSystemView takeFocusWhenMapped:true
+    "
 ! !
 
 !TopView methodsFor:'Compatibility-ST80'!
@@ -811,5 +823,5 @@
 !TopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.82 2003-07-22 17:56:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.83 2004-02-02 13:54:14 ca Exp $'
 ! !