diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-03-02 16:51:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-03-02 16:51:02 +0000 |
| commit | 9376442d171fc386c3ec320a23b9f6ab12cb31e0 (patch) | |
| tree | ed23f95e0a80045de3f538f6d6cebe351d3da54f /lisp/shell.el | |
| parent | 254b60f8b6aaf16bea9cbcc3b5551c73a14678c2 (diff) | |
| download | emacs-9376442d171fc386c3ec320a23b9f6ab12cb31e0.tar.gz | |
(shell-mode-map): Use copy-keymap.
Diffstat (limited to 'lisp/shell.el')
| -rw-r--r-- | lisp/shell.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index a759aedc8ea..97a86d9de6a 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -230,9 +230,9 @@ Thus, this does not include the shell's current directory.") (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) |