From 690ec64977401b78094df77c5e28ce91a4a5c9a8 Mon Sep 17 00:00:00 2001 From: Sam Steingold Date: Tue, 10 Oct 2000 17:27:38 +0000 Subject: use lisp-mode-shared-map instead of shared-lisp-mode-map --- lisp/chistory.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'lisp/chistory.el') diff --git a/lisp/chistory.el b/lisp/chistory.el index 6c5eaba8b72..a32720a40ce 100644 --- a/lisp/chistory.el +++ b/lisp/chistory.el @@ -145,10 +145,9 @@ The buffer is left in Command History mode." :group 'chistory) (defvar command-history-map nil) -(if command-history-map - nil - (setq command-history-map - (nconc (make-sparse-keymap) shared-lisp-mode-map)) +(unless command-history-map + (setq command-history-map (make-sparse-keymap)) + (set-keymap-parent command-history-map lisp-mode-shared-map) (suppress-keymap command-history-map) (define-key command-history-map "x" 'command-history-repeat) (define-key command-history-map "\n" 'next-line) -- cgit v1.2.3