Re: address@hidden: a bug of read-passwd]

[Chong Yidong]

> Recent changes of Emacs introduces a new bug to read-passwd.  If
> read-passwd is called a filter of an asynchronous process and the
> parent code executes sit-for, the cursor goes away from the minibuffer
> and we cannot input our password.
>
> The following code can reproduce this:
>
> (defvar my-check nil)
>
> (defun my-filter (process string)
>   (set-buffer (process-buffer process))
>   (read-passwd "Password: ")
>   (setq my-check nil))
>
> (let ((pro (start-process "*sh*" (current-buffer) "/bin/sh")))
>   (setq my-check t)
>   (set-process-filter pro 'my-filter)
>   (while my-check
>     (sit-for 0.1)
>     (discard-input)))

Does the code work if you remove the (discard-input)?