--- a/WindowGroup.st	Mon Oct 23 18:40:47 2000 +0200
+++ b/WindowGroup.st	Wed Oct 25 14:06:01 2000 +0200
@@ -950,6 +950,7 @@
             ]
         ] newProcess.
         myProcess priority:(Processor userSchedulingPriority).
+        myProcess beGroupLeader.
 
         (topViews size > 0) ifTrue:[
             "/
@@ -999,8 +1000,7 @@
 
     "Modified: / 13.12.1995 / 14:04:53 / stefan"
     "Created: / 24.7.1997 / 12:52:04 / cg"
-    "Modified: / 4.12.1997 / 14:13:35 / cg"
-! !
+    "Modified: / 4.12.1997 / 14:13:35 / cg"! !
 
 !WindowGroup methodsFor:'enumerating'!
 
@@ -2470,6 +2470,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.213 2000-09-22 11:44:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.214 2000-10-25 12:06:01 stefan Exp $'
 ! !
 WindowGroup initialize!