From xemacs-m  Sun Mar  2 15:44:42 1997
Received: from altair.xemacs.org (steve@xemacs.miranova.com [206.190.83.19])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id PAA24553
	for <xemacs-beta@xemacs.org>; Sun, 2 Mar 1997 15:44:41 -0600 (CST)
Received: (from steve@localhost)
	by altair.xemacs.org (8.8.5/8.8.5) id NAA08629;
	Sun, 2 Mar 1997 13:56:15 -0800
Mail-Copies-To: never
To: xemacs-beta@xemacs.org
Subject: Re: [19.15b95]: input-pending-p is nil even after keypress
References: <9702261116.AA25392@mail.esrin.esa.it>
X-Url: http://www.miranova.com/%7Esteve/
X-Face: #!T9!#9s-3o8)*uHlX{Ug[xW7E7Wr!*L46-OxqMu\xz23v|R9q}lH?cRS{rCNe^'[`^sr5"
 f8*@r4ipO6Jl!:Ccq<xoV[Qz2u8<8-+Vwf2gzJ44lf_/y9OaQ`@#Q65{U4/TC)i2`~/M&QI$X>p:9I
 OSS'2{-)-4wBnVeg0S\O4Al@)uC[pD|+
X-Attribution: sb
From: Steven L Baur <steve@miranova.com>
In-Reply-To: Simon Marshall's message of Wed, 26 Feb 97 11:16:35 GMT
Mime-Version: 1.0 (generated by tm-edit 7.105)
Content-Type: text/plain; charset=US-ASCII
Date: 02 Mar 1997 13:56:11 -0800
Message-ID: <m27mjqvtz8.fsf@altair.xemacs.org>
Lines: 39
X-Mailer: Gnus v5.4.17/XEmacs 20.1

Can anyone duplicate this with the latest betas on any platform?  I can't.

Simon Marshall writes:

> No need to apologise!  Now I'm curious.  Start up so you have lazy-lock.el
> around, and in *scratch* evaluate:

> (defun lazy-lock-post-command-fontify-windows ()
>   ;; Do groovy things if (a) not in a macro, (b) no input pending, (c) got a
>   ;; real command, (d) not in the minibuffer, and (e) no input after waiting
>   ;; for `lazy-lock-continuity-time'.
>   (if (input-pending-p)
>       (error "Yes! input-pending-p!"))
>   (if (or executing-kbd-macro
> 	  (input-pending-p)
> 	  (memq this-command lazy-lock-ignore-commands)
> 	  (window-minibuffer-p (selected-window)))
>       (setq lazy-lock-cache-continue nil)
>     (setq lazy-lock-cache-continue t)
>     (if (sit-for lazy-lock-continuity-time lazy-lock-hide-invisible)
> 	;; Do the visible parts of the buffer(s), i.e., the window(s).
> 	(if (or (not lazy-lock-walk-windows)
> 		(and (eq lazy-lock-walk-windows t) (one-window-p t)))
> 	    (if lazy-lock-mode (condition-case nil (lazy-lock-fontify-window)))
> 	  (lazy-lock-fontify-walk-windows)))))

> Now go back to your big file and C-n to your heart's content.  Does an
> error get signalled?  It does not for me, even when XEmacs gets windows
> behind with its scrolling.  That's how I found the input-pending-p bug and
> made a simple way of reproducing it (for me).

> Can anyone else reproduce the original reproduction script on SunOS 4.1.3?

> Ta, Si.


-- 
steve@miranova.com baur
Unsolicited commercial e-mail will be billed at $250/message.

