--- a/ActiveHelp.st	Fri Jul 31 19:40:15 1998 +0200
+++ b/ActiveHelp.st	Fri Jul 31 19:41:08 1998 +0200
@@ -604,7 +604,7 @@
 
     top := aView topView.
     (app := aView application) notNil ifTrue:[
-        (app showHelp:text for:aView) ifTrue:[
+        (app showActiveHelp:text for:aView) ifTrue:[
             lastHelpText := text.
             ^ self
         ]
@@ -634,7 +634,7 @@
     "
 
     "Created: / 28.6.1997 / 14:45:41 / cg"
-    "Modified: / 29.10.1997 / 22:34:59 / cg"
+    "Modified: / 31.7.1998 / 18:25:28 / cg"
 !
 
 showHelp:aHelpText for:view
@@ -756,6 +756,6 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.32 1998-07-28 10:00:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.33 1998-07-31 17:41:08 cg Exp $'
 ! !
 ActiveHelp initialize!