(read-key): Use read-key-auxiliary-map, not read-key-aux-map.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 678887c9e29e008855e34cd1d8eec3b2b278c288..a822e61d9185b4abc5b455b43a97ac7aaa118b0b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-09-29  Noah Friedman  <friedman@splode.com>
+
+       * subr.el (read-key): Use read-key-auxiliary-map, not
+       read-key-aux-map.
+
 2002-09-29  Richard M. Stallman  <rms@gnu.org>
 
        * startup.el (user-mail-address): Initialize to a useful value

diff --git a/lisp/subr.el b/lisp/subr.el
index 8c7212e5ef19579fcf6a31f02eb735d914571e27..17d47e2d1b1c09d36d37c307702a0da5226573e5 100644 (file)
--- 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)