--- a/ActiveHelp.st Wed May 14 20:30:35 2014 +0200
+++ b/ActiveHelp.st Fri May 16 09:49:59 2014 +0200
@@ -267,7 +267,8 @@
showTime
"set the number of seconds, a help messages is to be shown.
- The default is 30 seconds."
+ The default is 30 seconds.
+ 0 means: show forever (i.e. until mouse is moved)"
^ ShowTime ? 30
@@ -353,7 +354,8 @@
showTime:numberOfSeconds
"set the number of seconds, a help messages is to be shown.
- The default is 30 seconds."
+ The default is 30 seconds.
+ 0 means: show forever (i.e. until mouse is moved)"
ShowTime := numberOfSeconds
@@ -637,6 +639,10 @@
!
showTime
+ "how long shall the help be shown;
+ 0 means: forever (until user moves the mouse);
+ >0 means that number of seconds"
+
^ self class showTime
! !
@@ -771,7 +777,7 @@
!ActiveHelp class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.77 2014-04-01 12:44:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.78 2014-05-16 07:49:59 cg Exp $'
! !