Re: jit-lock timer etc.

[martin rudalics <rudalics@gmx.at>]

> Please try using time-to-seconds to convert.

Sorry, the tire's still flat.  Using

	(let ((message-log-max t)
	      (count 0))
	  (message "%s ... %s" (setq count (1+ count)) jit-lock-stealth-repeat-timer)
	  (timer-set-idle-time jit-lock-stealth-repeat-timer
			       (time-to-seconds (current-idle-time)))
	  (message "%s ... %s" (setq count (1+ count)) jit-lock-stealth-repeat-timer)
	  (timer-inc-time jit-lock-stealth-repeat-timer (max delay 0.1))
	  (message "%s ... %s" (setq count (1+ count)) jit-lock-stealth-repeat-timer)
	  (timer-activate-when-idle jit-lock-stealth-repeat-timer t)
	  (message "%s ... %s" (setq count (1+ count)) jit-lock-stealth-repeat-timer))

typically gets me

1 ... [t nil nil nil nil jit-lock-stealth-fontify t nil]
Loading time-date...done
2 ... [t 0 3 20000 nil jit-lock-stealth-fontify t nil]
3 ... [t 0 3 120000 nil jit-lock-stealth-fontify t nil]
4 ... [nil 0 3 120000 nil jit-lock-stealth-fontify t t]
1 ... [t 0 3 120000 nil jit-lock-stealth-fontify t t]
2 ... [t 0 3 20000 nil jit-lock-stealth-fontify t t]
3 ... [t 0 3 120000 nil jit-lock-stealth-fontify t t]
4 ... [nil 0 3 120000 nil jit-lock-stealth-fontify t t]
1 ... [t 0 3 120000 nil jit-lock-stealth-fontify t t]
2 ... [t 0 3 20000 nil jit-lock-stealth-fontify t t]
3 ... [t 0 3 120000 nil jit-lock-stealth-fontify t t]
4 ... [nil 0 3 120000 nil jit-lock-stealth-fontify t t]
1 ... [t 0 3 120000 nil jit-lock-stealth-fontify t t]
2 ... [t 0 3 20000 nil jit-lock-stealth-fontify t t]
3 ... [t 0 3 120000 nil jit-lock-stealth-fontify t t]
4 ... [nil 0 3 120000 nil jit-lock-stealth-fontify t t]

where every new cycle was caused by a mouse-click to trigger
`jit-lock-stealth-timer'.

(I used "(max delay 0.1)" because I thought that a delay of zero
could cause problems, but there's no difference.)