--- a/ApplicationModel.st	Fri Oct 29 15:26:01 1999 +0200
+++ b/ApplicationModel.st	Wed Nov 03 09:49:32 1999 +0100
@@ -1945,6 +1945,7 @@
     |wg wgProcess views|
 
     self release.
+    ActiveHelp stopFor:self.
 
     (wg := self windowGroup) notNil ifTrue:[
         wgProcess := wg process.
@@ -2207,6 +2208,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.117 1999-10-12 12:48:12 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.118 1999-11-03 08:49:32 ca Exp $'
 ! !
 ApplicationModel initialize!