1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/map-ynp.el b/lisp/map-ynp.el
index 777c1e39614..37f9e702c86 100644
--- a/lisp/map-ynp.el
+++ b/lisp/map-ynp.el
@@ -157,7 +157,7 @@ the current %s and exit."
                            (funcall actor elt)
                            (setq actions (1+ actions))))))
                   ((= ?? char)
-                   (setq unread-command-char help-char)
+                   (setq unread-command-event help-char)
                    (setq next (` (lambda ()
                                    (setq next '(, next))
                                    '(, elt)))))