UserPreferences: fix for #toolTipAutoHideDelay: - should fix #57 jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Tue, 08 Mar 2011 02:57:52 +0000
branchjv
changeset 17828 80569919f447
parent 17827 01eb98d70b20
child 17829 456b0a794264
UserPreferences: fix for #toolTipAutoHideDelay: - should fix #57
UserPreferences.st
--- a/UserPreferences.st	Mon Mar 07 20:13:29 2011 +0000
+++ b/UserPreferences.st	Tue Mar 08 02:57:52 2011 +0000
@@ -754,6 +754,7 @@
     ^ self at:#soapLoggingLevel put:anIntegerBetween0_and_3
 ! !
 
+
 !UserPreferences methodsFor:'accessing-pref''d tools'!
 
 changesBrowserClass
@@ -1507,13 +1508,14 @@
     "set the time, tooltips are shown. Nil means: dont hide"
 
     self at:#toolTipAutoHideDelay put:aTimeDuration.
-    FlyByHelp showTime:aTimeDuration asSeconds.
+    FlyByHelp showTime: (aTimeDuration isInteger ifTrue:[aTimeDuration] ifFalse:[aTimeDuration asSeconds]).
 
     "
      UserPreferences current toolTipAutoHideDelay:10 seconds
     "
 
     "Created: / 10-11-2010 / 12:09:33 / cg"
+    "Modified: / 07-03-2011 / 23:56:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 waitCursorVisibleTime
@@ -3240,9 +3242,10 @@
     ^ self at:#verboseBacktraceInDebugger put:aBoolean
 ! !
 
+
+
 !UserPreferences methodsFor:'default settings - syntax colors'!
 
-
 listOfPredefinedSyntaxColoringSchemes
     "return a list of pre-defined syntax highlightning styles
      (as shown in the Launchers 'source and debugger settings' dialog."
@@ -3461,7 +3464,7 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Id: UserPreferences.st 10602 2010-12-20 07:13:27Z vranyj1 $'
+    ^ '$Id: UserPreferences.st 10621 2011-03-08 02:57:52Z vranyj1 $'
 !
 
 version_CVS
@@ -3469,10 +3472,5 @@
 !
 
 version_SVN
-    ^ '$Id: UserPreferences.st 10602 2010-12-20 07:13:27Z vranyj1 $'
+    ^ '$Id: UserPreferences.st 10621 2011-03-08 02:57:52Z vranyj1 $'
 ! !
-
-
-
-
-