--- a/ActiveHelp.st	Wed Nov 10 12:31:24 2010 +0100
+++ b/ActiveHelp.st	Wed Nov 10 12:31:28 2010 +0100
@@ -219,21 +219,6 @@
 "
 ! !
 
-!ActiveHelp class methodsFor:'initialization'!
-
-initialize
-    "set default delay & help-display times"
-
-    ShowTime := 10.
-    DelayTime := 0.4.
-
-    "
-     ActiveHelp initialize
-    "
-
-    "Modified: 27.4.1996 / 15:07:27 / cg"
-! !
-
 !ActiveHelp class methodsFor:'queries'!
 
 currentHelpListener
@@ -257,7 +242,12 @@
 !
 
 showTime
-    ^ ShowTime ? 10
+    "set the number of seconds, a help messages is to be shown.
+     The default is 30 seconds."
+
+    ^ ShowTime ? 30
+
+    "Modified: / 10-11-2010 / 12:29:44 / cg"
 ! !
 
 !ActiveHelp class methodsFor:'start & stop'!
@@ -339,7 +329,7 @@
 
 showTime:numberOfSeconds
     "set the number of seconds, a help messages is to be shown.
-     The default is 10 seconds."
+     The default is 30 seconds."
 
     ShowTime := numberOfSeconds
 
@@ -348,6 +338,8 @@
      ActiveHelp showTime:99999 
      ActiveHelp showTime:30
     "
+
+    "Modified: / 10-11-2010 / 12:29:40 / cg"
 ! !
 
 !ActiveHelp methodsFor:'event handling'!
@@ -736,11 +728,9 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.66 2009-11-04 11:56:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.67 2010-11-10 11:31:28 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.66 2009-11-04 11:56:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.67 2010-11-10 11:31:28 cg Exp $'
 ! !
-
-ActiveHelp initialize!