master c4ec6d0472b: * lisp/subr.el (read-char-from-minibuffer): Fix bug#68995

[Stefan Monnier]

branch: master
commit c4ec6d0472beac2a0cb4f5c8baec79e39dfc410b
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * lisp/subr.el (read-char-from-minibuffer): Fix bug#68995
---
 lisp/subr.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index e53ef505522..f41bb34045e 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3726,10 +3726,10 @@ There is no need to explicitly add `help-char' to CHARS;
          (this-command this-command)
          (result (minibuffer-with-setup-hook
                     (lambda ()
+                      (setq-local post-self-insert-hook nil)
                       (add-hook 'post-command-hook
                                 (lambda ()
-                                  ;; FIXME: Should we use `<='?
-                                  (if (= (1+ (minibuffer-prompt-end))
+                                  (if (<= (1+ (minibuffer-prompt-end))
                                          (point-max))
                                        (exit-minibuffer)))
                                 nil 'local))