From 580f6aa50b37fa5230557e75b7009a951b302281 Mon Sep 17 00:00:00 2001 From: Noah Friedman Date: Sun, 29 Sep 2002 18:38:23 +0000 Subject: [PATCH] (read-key): Use read-key-auxiliary-map, not read-key-aux-map. --- lisp/ChangeLog | 5 +++++ lisp/subr.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 678887c9e29..a822e61d918 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-09-29 Noah Friedman + + * subr.el (read-key): Use read-key-auxiliary-map, not + read-key-aux-map. + 2002-09-29 Richard M. Stallman * startup.el (user-mail-address): Initialize to a useful value diff --git a/lisp/subr.el b/lisp/subr.el index 8c7212e5ef1..17d47e2d1b1 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1071,7 +1071,7 @@ Legitimate radix values are 8, 10 and 16." "Read a key from the keyboard. Contrary to `read-event' this will not return a raw event but will obey `function-key-map' and `key-translation-map' instead." - (let ((overriding-terminal-local-map read-key-aux-map)) + (let ((overriding-terminal-local-map read-key-auxiliary-map)) (aref (read-key-sequence prompt nil t) 0))) (defun read-quoted-char (&optional prompt) -- 2.39.5