Org: mks-read-key wants another argument now

2021-02-25 17:46:26 +08:00 · 2021-02-25 17:46:26 +08:00 · 1fdddb9a94
parent 6e0e354920
commit 1fdddb9a94
1 changed files with 3 additions and 1 deletions
--- a/config.org
+++ b/config.org
@ -4529,7 +4529,9 @@ is selected, only the bare key is returned."
                (goto-char (point-min))
                (unless (pos-visible-in-window-p (point-max))
                  (org-fit-window-to-buffer))
-                (let ((pressed (org--mks-read-key allowed-keys prompt)))
+                (let ((pressed (org--mks-read-key allowed-keys
+                                                  prompt
+                                                  (not (pos-visible-in-window-p (1- (point-max)))))))
                  (setq current (concat current pressed))
                  (cond
                   ((equal pressed "\C-g") (user-error "Abort"))