--- a/XWorkstation.st	Wed Aug 25 18:00:51 1999 +0200
+++ b/XWorkstation.st	Sat Aug 28 22:18:12 1999 +0200
@@ -8090,6 +8090,9 @@
 !
 
 setInputFocusTo:aWindowId
+    "set the focus to the view as defined by aWindowId.
+     When released, return the focus to the root window"
+
 "/    self setInputFocusTo:aWindowId revertTo:#parent
     self setInputFocusTo:aWindowId revertTo:#root
 !
@@ -10178,6 +10181,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.323 1999-08-23 23:06:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.324 1999-08-28 20:18:12 cg Exp $'
 ! !
 XWorkstation initialize!