--- a/ActiveHelp.st	Sat Mar 13 16:53:45 1999 +0100
+++ b/ActiveHelp.st	Mon Mar 15 11:54:48 1999 +0100
@@ -617,6 +617,9 @@
 
     |text top app|
 
+    (self interestedIn:aView) ifFalse:[
+        ^ self
+    ].
     x isNil ifTrue:[
         text := aView helpText
     ] ifFalse:[
@@ -640,7 +643,7 @@
         ]
     ].
 
-    text notNil ifTrue:[
+    text size > 0 ifTrue:[
         (showItNow not and:[DelayTime > 0]) ifTrue:[
             self stopHelpDisplayProcess.
             showProcess := [
@@ -664,7 +667,7 @@
     "
 
     "Created: / 28.6.1997 / 14:45:41 / cg"
-    "Modified: / 31.7.1998 / 18:25:28 / cg"
+    "Modified: / 15.3.1999 / 08:38:14 / cg"
 !
 
 showHelp:aHelpText for:view
@@ -786,6 +789,6 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.38 1999-03-13 15:53:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.39 1999-03-15 10:54:48 cg Exp $'
 ! !
 ActiveHelp initialize!