Re: redisplay-dont-pause does not work

[Lars Hansen]

Kim F. Storm wrote:

>David Kastrup <address@hidden> writes:
>
>  
>
>> I propose checking this change in.
>>    
>>
>
>Done.
>  
>
Thanks!

What about something like this:

*** /home/lh/cvsroot/emacs/lisp/subr.el 2006-06-01 22:55:47.000000000 +0200
--- subr.el     2006-06-05 09:04:22.868010017 +0200
***************
*** 1869,1874 ****
--- 1869,1879 ----
        (setq buffer-file-name name)
        (set-buffer-modified-p modified))))
  
+ (defun redisplay-now ()
+   "Force display update."
+   (let ((redisplay-dont-pause t))
+     (sit-for 0)))
+ 
  
  ;;;; Overlay operations
  

*** /home/lh/cvsroot/emacs/lispref/display.texi 2006-06-01 22:55:58.000000000 
+0200
--- display.texi        2006-06-05 10:30:36.432000900 +0200
***************
*** 103,114 ****
  
    You can request a display update, but only if no input is pending,
  with @code{(sit-for 0)}.  To force a display update even when input is
! pending, do this:
! 
! @example
! (let ((redisplay-dont-pause t))
!   (sit-for 0))
! @end example
  
  @node Truncation
  @section Truncation
--- 103,109 ----
  
    You can request a display update, but only if no input is pending,
  with @code{(sit-for 0)}.  To force a display update even when input is
! pending, call @code{redisplay-now}.
  
  @node Truncation
  @section Truncation