Mercurial > emacs

diff lisp/shell.el @ 6150:c1dde384f0dd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(shell-mode-map): Use copy-keymap.
author Richard M. Stallman <rms@gnu.org>
date Wed, 02 Mar 1994 16:51:02 +0000
parents 7051027369d6
children 34d9a0aa80d1
line wrap: on
line diff
--- a/lisp/shell.el	Wed Mar 02 16:45:37 1994 +0000
+++ b/lisp/shell.el	Wed Mar 02 16:51:02 1994 +0000
@@ -230,9 +230,9 @@
 (defvar shell-dirstack-query "dirs"
   "Command used by `shell-resync-dir' to query the shell.")
 
-(defvar shell-mode-map '())
+(defvar shell-mode-map nil)
 (cond ((not shell-mode-map)
-       (setq shell-mode-map (full-copy-sparse-keymap comint-mode-map))
+       (setq shell-mode-map (copy-keymap comint-mode-map))
        (define-key shell-mode-map "\C-c\C-f" 'shell-forward-command)
        (define-key shell-mode-map "\C-c\C-b" 'shell-backward-command)
        (define-key shell-mode-map "\t" 'comint-dynamic-complete)