emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: jit-lock timer etc.


From: Kim F. Storm
Subject: Re: jit-lock timer etc.
Date: Thu, 24 Aug 2006 11:10:56 +0200
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

address@hidden (Kim F. Storm) writes:

> With the above change to current-idle-time, it seems the following
> should work:
>
>        (when (and jit-lock-stealth-buffers jit-lock-stealth-time)
>       ;; Call us again.
>         (let ((idle (current-idle-time)))
>           (when idle
>           (timer-set-idle-time jit-lock-stealth-repeat-timer delay)
>           (timer-inc-time jit-lock-stealth-repeat-timer (car idle) (cdr idle))
>           (timer-activate-when-idle jit-lock-stealth-repeat-timer t)))
>

With the latest version of current-idle-time, this now becomes:


        (when (and jit-lock-stealth-buffers jit-lock-stealth-time)
        ;; Call us again.
         (let ((idle (current-idle-time)))
           (when idle
            (timer-set-idle-time jit-lock-stealth-repeat-timer idle)
            (timer-inc-time jit-lock-stealth-repeat-timer delay)
            (timer-activate-when-idle jit-lock-stealth-repeat-timer t)))

[I swapped idle and delay args back again, as using floats DTRT]

It can't get much simpler than that!

-- 
Kim F. Storm <address@hidden> http://www.cua.dk





reply via email to

[Prev in Thread] Current Thread [Next in Thread]