read-char bug

read-char bug

[Davin Pearson]

When I run the following code and then press the left mouse button and it goes into an infinite loop.  I have also tried the alternative to read-char, methinks it is something like read-char-exclusive and that fails too.

(let (done ch)
  (setq done nil)
  (when (not done)
  (condition-case err
     (setq ch (read-char "Enter y, n, ! or q"))'
     (error 
        (message "Wrong char")))
        ))
   ch)

Re: read-char bug

[Eli Zaretskii]

> Date: Fri, 19 Oct 2018 18:30:38 -0700 (PDT)
> From: Davin Pearson <davin.pearson@gmail.com>
> 
> When I run the following code and then press the left mouse button and it goes into an infinite loop.  I have also tried the alternative to read-char, methinks it is something like read-char-exclusive and that fails too.
> 
> (let (done ch)
>   (setq done nil)
>   (when (not done)
>   (condition-case err
>      (setq ch (read-char "Enter y, n, ! or q"))'
>      (error 
>         (message "Wrong char")))
>         ))
>    ch)

The above has syntax errors, so it's hard to know what you actually
run.  If I clean it up as best as I understand, then I cannot
reproduce this in Emacs 26.1, so lease also tell what version of Emacs
are you using.