diff options
| author | Stefan Monnier | 2024-02-09 14:08:51 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2024-02-09 14:08:51 -0500 |
| commit | c4ec6d0472beac2a0cb4f5c8baec79e39dfc410b (patch) | |
| tree | e4d39047be69ac8dbc1e2b2f68ebde7329f24012 | |
| parent | 8d6a8e573f9a1e4eb9ebbc0ec244907263e61bb8 (diff) | |
| download | emacs-c4ec6d0472beac2a0cb4f5c8baec79e39dfc410b.tar.gz emacs-c4ec6d0472beac2a0cb4f5c8baec79e39dfc410b.zip | |
* lisp/subr.el (read-char-from-minibuffer): Fix bug#68995
| -rw-r--r-- | lisp/subr.el | 4 |
1 files 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; | |||
| 3726 | (this-command this-command) | 3726 | (this-command this-command) |
| 3727 | (result (minibuffer-with-setup-hook | 3727 | (result (minibuffer-with-setup-hook |
| 3728 | (lambda () | 3728 | (lambda () |
| 3729 | (setq-local post-self-insert-hook nil) | ||
| 3729 | (add-hook 'post-command-hook | 3730 | (add-hook 'post-command-hook |
| 3730 | (lambda () | 3731 | (lambda () |
| 3731 | ;; FIXME: Should we use `<='? | 3732 | (if (<= (1+ (minibuffer-prompt-end)) |
| 3732 | (if (= (1+ (minibuffer-prompt-end)) | ||
| 3733 | (point-max)) | 3733 | (point-max)) |
| 3734 | (exit-minibuffer))) | 3734 | (exit-minibuffer))) |
| 3735 | nil 'local)) | 3735 | nil 'local)) |