Mercurial > emacs
comparison lisp/comint.el @ 79623:4a3bc3d3d492
(comint-mode-map): Explicitly bind `delete' and `kp-delete'
so they never do EOF.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 25 Dec 2007 16:56:20 +0000 |
parents | c5f06cb9fa56 |
children | 73661ddc7ac7 cdd30283527d |
comparison
equal
deleted
inserted
replaced
79622:f21bb04cb3ab | 79623:4a3bc3d3d492 |
---|---|
451 (define-key map [?\C-c ?\M-r] 'comint-previous-matching-input-from-input) | 451 (define-key map [?\C-c ?\M-r] 'comint-previous-matching-input-from-input) |
452 (define-key map [?\C-c ?\M-s] 'comint-next-matching-input-from-input) | 452 (define-key map [?\C-c ?\M-s] 'comint-next-matching-input-from-input) |
453 (define-key map "\e\C-l" 'comint-show-output) | 453 (define-key map "\e\C-l" 'comint-show-output) |
454 (define-key map "\C-m" 'comint-send-input) | 454 (define-key map "\C-m" 'comint-send-input) |
455 (define-key map "\C-d" 'comint-delchar-or-maybe-eof) | 455 (define-key map "\C-d" 'comint-delchar-or-maybe-eof) |
456 ;; The following two are standardly aliased to C-d, | |
457 ;; but they should never do EOF, just delete. | |
458 (define-key map [delete] 'delete-char) | |
459 (define-key map [kp-delete] 'delete-char) | |
456 (define-key map "\C-c " 'comint-accumulate) | 460 (define-key map "\C-c " 'comint-accumulate) |
457 (define-key map "\C-c\C-x" 'comint-get-next-from-history) | 461 (define-key map "\C-c\C-x" 'comint-get-next-from-history) |
458 (define-key map "\C-c\C-a" 'comint-bol-or-process-mark) | 462 (define-key map "\C-c\C-a" 'comint-bol-or-process-mark) |
459 (define-key map "\C-c\C-u" 'comint-kill-input) | 463 (define-key map "\C-c\C-u" 'comint-kill-input) |
460 (define-key map "\C-c\C-w" 'backward-kill-word) | 464 (define-key map "\C-c\C-w" 'backward-kill-word) |