run-with-idle-timer and sit-for/sleep-for

run-with-idle-timer and sit-for/sleep-for

[Lennart Borgman (gmail)]

I would like an idle timer to run during a sit-for:

  (defun temp-idle()
    (message "temp-idle"))

  (defun temp()
    (interactive)
    (message "temp a")
    (run-with-idle-timer 1 nil 'temp-idle)
    (sit-for 4)
    (message "temp b"))

This does not work, but it would be great for testing. Is there any way 
to get it to work?

Re: run-with-idle-timer and sit-for/sleep-for

[Andreas Röhler]

Am Dienstag, 8. Juli 2008 schrieb Lennart Borgman (gmail):
>   (defun temp-idle()
>     (message "temp-idle"))
> 
>   (defun temp()
>     (interactive)
>     (message "temp a")
>     (run-with-idle-timer 1 nil 'temp-idle)
>     (sit-for 4)
>     (message "temp b"))


Hi,

here it works.

I.e. if I wait after `run-with-idle-timer'

"temp-idle" is shown in the message buffer.

With `sit-for' emacs probably isn`t idle, but counting.

Maybe describe the case you will test, so we may find a solution.

Cheers

Andreas Röhler

Re: run-with-idle-timer and sit-for/sleep-for

[Lennart Borgman (gmail)]

Andreas Röhler wrote:
> Am Dienstag, 8. Juli 2008 schrieb Lennart Borgman (gmail):
>>   (defun temp-idle()
>>     (message "temp-idle"))
>>
>>   (defun temp()
>>     (interactive)
>>     (message "temp a")
>>     (run-with-idle-timer 1 nil 'temp-idle)
>>     (sit-for 4)
>>     (message "temp b"))
> 
> 
> Hi,
> 
> here it works.
> 
> I.e. if I wait after `run-with-idle-timer'
> 
> "temp-idle" is shown in the message buffer.

I am not sure what you mean. With the above I get the output

   temp a
   tamp b
   temp-idle

> With `sit-for' emacs probably isn`t idle, but counting.

Yes, it is not idle in the sense I want it to be here. (But is it really 
counting?)

> Maybe describe the case you will test, so we may find a solution.

Thanks, I want to test fontification with mumamo. However I think I have 
found a recipe now that works:

   (defun be-really-idle (seconds)
     (with-timeout (4 (message "timed out: %s"
                               (format-time-string "%M:%S")))
       (read-minibuffer (format-time-string
                         "Just waiting: %M:%S"))))

   (defun temp-idle()
     (message "temp-idle: %s" (format-time-string "%M:%S")))

   (defun temp()
     (interactive)
     (message "temp a: %s" (format-time-string "%M:%S"))
     (run-with-idle-timer 1 nil 'temp-idle)
     (be-really-idle 4)
     (message "temp b: %s" (format-time-string "%M:%S")))

This gives me the output I want:

  temp a: 01:14
  temp-idle: 01:15
  timed out: 01:18
  temp b: 01:18

> Cheers
> 
> Andreas Röhler
> 
> 
> 
> 
>