From 4b6b279f02b5bacc86b0cf3a4ac730e3f02cbad1 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 9 Jul 2006 15:24:22 +0000 Subject: [PATCH] * emacs-lisp/helper.el (Helper-help-scroller): Don't signal error on non-char events. --- lisp/ChangeLog | 5 +++++ lisp/emacs-lisp/helper.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bae1c4e10de..0760219e14c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-07-09 Chong Yidong + + * emacs-lisp/helper.el (Helper-help-scroller): Don't signal error + on non-char events. + 2006-07-09 Romain Francoise * progmodes/compile.el (compilation-mode-font-lock-keywords): diff --git a/lisp/emacs-lisp/helper.el b/lisp/emacs-lisp/helper.el index 3b614be26f4..92eb86ce676 100644 --- a/lisp/emacs-lisp/helper.el +++ b/lisp/emacs-lisp/helper.el @@ -77,7 +77,7 @@ "Delete scrolls back. Other keys %s" "Type anything to %s")) blurb) - (setq continue (read-char)) + (setq continue (read-event)) (cond ((and (memq continue '(?\s ?\C-v)) (< state 2)) (scroll-up)) ((= continue ?\C-l) -- 2.39.5