ActiveHelp.st
changeset 726 cdab756aebe4
parent 719 17fba5c2a167
child 728 9f417e396d4e
--- a/ActiveHelp.st	Tue Oct 28 21:00:40 1997 +0100
+++ b/ActiveHelp.st	Wed Oct 29 17:10:44 1997 +0100
@@ -729,19 +729,19 @@
 
     self hideHelp.
     applicationsOrTopViewsWithHelp remove:anApp ifAbsent:nil.
-    listeningForAll ifFalse:[
+    listeningForAll == true ifFalse:[
         applicationsOrTopViewsWithHelp size == 0 ifTrue:[
             super unlisten.
         ]
     ]
 
-    "Modified: / 26.10.1997 / 23:17:43 / cg"
     "Created: / 26.10.1997 / 23:22:42 / cg"
+    "Modified: / 29.10.1997 / 15:48:34 / cg"
 ! !
 
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.29 1997-10-28 18:43:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.30 1997-10-29 16:10:29 cg Exp $'
 ! !
 ActiveHelp initialize!