From 71a05b36ba10235182f5909eb452cbf5635b8df9 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 18 Oct 2006 10:58:39 +0000 Subject: [PATCH] (read-expression-map): Just set it, no defvar. --- lisp/simple.el | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/lisp/simple.el b/lisp/simple.el index 0d16e6a79eb..d6feaa1e8e9 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -997,12 +997,11 @@ in *Help* buffer. See also the command `describe-char'." (single-key-description char)) encoding-msg pos total percent col hscroll)))))) -(defvar read-expression-map - (let ((m (make-sparse-keymap))) - (define-key m "\M-\t" 'lisp-complete-symbol) - (set-keymap-parent m minibuffer-local-map) - m) - "Minibuffer keymap used for reading Lisp expressions.") +;; Initialize read-expression-map. It is defined at C level. +(let ((m (make-sparse-keymap))) + (define-key m "\M-\t" 'lisp-complete-symbol) + (set-keymap-parent m minibuffer-local-map) + (setq read-expression-map m)) (defvar read-expression-history nil) -- 2.39.5