--- a/ActiveHelp.st	Tue Jan 20 15:07:01 2004 +0100
+++ b/ActiveHelp.st	Thu Jan 29 23:47:58 2004 +0100
@@ -15,11 +15,18 @@
 
 EventListener subclass:#ActiveHelp
 	instanceVariableNames:'lastHelpText listeningForAll applicationsOrTopViewsWithHelp'
-	classVariableNames:'DelayTime ShowTime TheOneAndOnlyHelpListener'
+	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Help'
 !
 
+ActiveHelp class instanceVariableNames:'DelayTime ShowTime TheOneAndOnlyHelpListener'
+
+"
+ No other class instance variables are inherited by this class.
+"
+!
+
 !ActiveHelp class methodsFor:'documentation'!
 
 copyright
@@ -239,12 +246,20 @@
     "Created: 28.6.1997 / 13:59:44 / cg"
 !
 
+delayTime
+    ^ DelayTime
+!
+
 isActive
     "return true, if activeHelp is turned on"
 
     ^ TheOneAndOnlyHelpListener notNil
 
     "Modified: 27.4.1996 / 15:07:57 / cg"
+!
+
+showTime
+    ^ ShowTime
 ! !
 
 !ActiveHelp class methodsFor:'start & stop'!
@@ -644,7 +659,7 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.50 2003-05-07 14:43:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.51 2004-01-29 22:47:55 ca Exp $'
 ! !
 
 ActiveHelp initialize!