--- a/WindowGroup.st Wed Apr 07 17:43:03 2004 +0200
+++ b/WindowGroup.st Wed Apr 07 17:55:42 2004 +0200
@@ -1316,9 +1316,7 @@
(views isNil and:[topViews isNil]) ifTrue:[
myProcess notNil ifTrue:[
- p := myProcess.
- myProcess := nil.
- p terminate.
+ self shutDownProcess.
"not reached - there is no life after death"
].
"
@@ -2738,7 +2736,7 @@
!WindowGroup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.261 2004-04-07 15:43:03 werner Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.262 2004-04-07 15:55:42 werner Exp $'
! !
WindowGroup initialize!