Mercurial > emacs
comparison lisp/shell.el @ 108968:a4e18a1ee55d
Bind `shell-resync-dirs' to M-RET in *shell* buffers.
author | Stephen Eglen <stephen@gnu.org> |
---|---|
date | Fri, 11 Jun 2010 14:28:41 +0100 |
parents | 1d1d5d9bd884 |
children | 515d80e174ba |
comparison
equal
deleted
inserted
replaced
108967:83458f5cdc38 | 108968:a4e18a1ee55d |
---|---|
338 (cond ((not shell-mode-map) | 338 (cond ((not shell-mode-map) |
339 (setq shell-mode-map (nconc (make-sparse-keymap) comint-mode-map)) | 339 (setq shell-mode-map (nconc (make-sparse-keymap) comint-mode-map)) |
340 (define-key shell-mode-map "\C-c\C-f" 'shell-forward-command) | 340 (define-key shell-mode-map "\C-c\C-f" 'shell-forward-command) |
341 (define-key shell-mode-map "\C-c\C-b" 'shell-backward-command) | 341 (define-key shell-mode-map "\C-c\C-b" 'shell-backward-command) |
342 (define-key shell-mode-map "\t" 'comint-dynamic-complete) | 342 (define-key shell-mode-map "\t" 'comint-dynamic-complete) |
343 (define-key shell-mode-map (kbd "M-RET") 'shell-resync-dirs) | |
343 (define-key shell-mode-map "\M-?" | 344 (define-key shell-mode-map "\M-?" |
344 'comint-dynamic-list-filename-completions) | 345 'comint-dynamic-list-filename-completions) |
345 (define-key shell-mode-map [menu-bar completion] | 346 (define-key shell-mode-map [menu-bar completion] |
346 (cons "Complete" | 347 (cons "Complete" |
347 (copy-keymap (lookup-key comint-mode-map [menu-bar completion])))) | 348 (copy-keymap (lookup-key comint-mode-map [menu-bar completion])))) |