[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Minor fix for life.el.
From: |
David Kastrup |
Subject: |
Re: Minor fix for life.el. |
Date: |
Wed, 06 Sep 2006 20:03:37 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
address@hidden (Michaël Cadilhac) writes:
> I usually use M-x life with zero as numerical prefix (it's lot of fun).
> M-0 M-x life RET
>
> There's a little bug: when I hit a key, life goes into an infinite
> loop (not MY life) and I have to C-g to stop this.
>
> The following patch fixes this bug (sit-for is still called because he
> causes redisplay).
>
> Index: lisp/play/life.el
> ===================================================================
> RCS file: /sources/emacs/emacs/lisp/play/life.el,v
> retrieving revision 1.25
> diff -c -r1.25 life.el
> *** lisp/play/life.el 5 Feb 2006 14:10:44 -0000 1.25
> --- lisp/play/life.el 6 Sep 2006 16:58:35 -0000
> ***************
> *** 269,275 ****
> (recenter 0)
>
> ;; Redisplay; if the user has hit a key, exit the loop.
> ! (or (eq t (sit-for sleeptime))
> (throw 'life-exit nil)))
>
> (defun life-extinct-quit ()
> --- 269,276 ----
> (recenter 0)
>
> ;; Redisplay; if the user has hit a key, exit the loop.
> ! (or (and (sit-for sleeptime) (< 0 sleeptime))
> ! (not (input-pending-p))
That looks like the wrong fix.
How about
(or (eq t (sit-for (max sleeptime 0)))
(throw 'life-exit nil))
--
David Kastrup, Kriemhildstr. 15, 44793 Bochum
- Minor fix for life.el., Michaël Cadilhac, 2006/09/06
- Re: Minor fix for life.el.,
David Kastrup <=
- Re: Minor fix for life.el., Michaël Cadilhac, 2006/09/06
- Re: Minor fix for life.el., David Kastrup, 2006/09/06
- Broken sit-for [was: Re: Minor fix for life.el.], Kim F. Storm, 2006/09/07
- Re: Broken sit-for, Michaël Cadilhac, 2006/09/08
- Re: Broken sit-for [was: Re: Minor fix for life.el.], Kim F. Storm, 2006/09/09
- Re: Broken sit-for, David Kastrup, 2006/09/09
- Re: Broken sit-for, Michaël Cadilhac, 2006/09/10
- Re: Broken sit-for, Kim F. Storm, 2006/09/10
- Re: Broken sit-for, Michaël Cadilhac, 2006/09/11
- Re: Broken sit-for, Kim F. Storm, 2006/09/10