Re: jit-lock timer etc.

[martin rudalics]

> 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.)