diff options
Diffstat (limited to 'lisp/map-ynp.el')
| -rw-r--r-- | lisp/map-ynp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/map-ynp.el b/lisp/map-ynp.el index 37f9e702c86..ddc91d32776 100644 --- a/lisp/map-ynp.el +++ b/lisp/map-ynp.el @@ -100,7 +100,7 @@ the current %s and exit." prompt char elt tail (next (if (or (symbolp list) (subrp list) - (compiled-function-p list) + (byte-code-function-p list) (and (consp list) (eq (car list) 'lambda))) (function (lambda () @@ -157,7 +157,7 @@ the current %s and exit." (funcall actor elt) (setq actions (1+ actions)))))) ((= ?? char) - (setq unread-command-event help-char) + (setq unread-command-events (list help-char)) (setq next (` (lambda () (setq next '(, next)) '(, elt))))) |