--- a/TopView.st	Fri Nov 14 00:48:53 2014 +0100
+++ b/TopView.st	Fri Nov 14 00:49:23 2014 +0100
@@ -1093,8 +1093,15 @@
      Can anyone tell me what the difference between raise, activate and setForeground
      really is (I mean really - not what is written in the crappy documentation)"
 
-    self drawableId isNil ifTrue:[self create].
-    self graphicsDevice activateWindow:self drawableId
+    |id|
+
+    (id := self drawableId) isNil ifTrue:[
+        self create.
+        id := self drawableId
+    ].
+    self graphicsDevice 
+        activateWindow:id;
+        focusView:self
 
     "
      Transcript topView activate
@@ -1443,11 +1450,11 @@
 !TopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.150 2014-06-10 10:23:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.151 2014-11-13 23:49:23 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.150 2014-06-10 10:23:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.151 2014-11-13 23:49:23 cg Exp $'
 ! !