Re: Broken sit-for

[Michaël Cadilhac]

David Kastrup <address@hidden> writes:

> address@hidden (Kim F. Storm) writes:
>
>> address@hidden (Kim F. Storm) writes:
>>
>>> I agree that (sit-for 0) should return nil if input is pending on entry.
>>
>> Are there any objections to installing the version of sit-for below:
>
> [...]
>
>> Value is t if waited the full time with no input arriving, and nil otherwise.

I still think this line should be slightly changed to say something
about zero (and negative) values of SECONDS.

>>    (t
>>     (or nodisp (redisplay))
>>     (let ((read (read-event nil nil seconds)))
>>       (or (null read)
>>        (progn (push read unread-command-events) nil))))))
>
> This does not interfere with the myriad of other
> unread-command-events like variables we have?  They are sure to be
> unused at this point of time?

Well, it actually triggers a problem.  See the thread « The order input
events are processed. »

-- 
 |      Michaël `Micha' Cadilhac   |  La culture c'est comme la confiture,  |
 |         Epita/LRDE Promo 2007   |      c'est meilleur avec du pain.      |
 | http://www.lrde.org/~cadilh_m   |           -- MOI59                     |
 `--  -   JID: address@hidden --'                                   -  --'

pgpCytLHxePFJ.pgp
Description: PGP signature