summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2013-12-13 02:47:18 +0200
committerJuri Linkov <juri@jurta.org>2013-12-13 02:47:18 +0200
commit2bc170c3f1a3661f31a868d7bac9b3b3909dc576 (patch)
tree642409a756c56418f537e871b2ce44eeb4b4bc81 /lisp
parentbc9222c93463e8aaaf116ed945c3d2007adf771d (diff)
downloademacs-2bc170c3f1a3661f31a868d7bac9b3b3909dc576.tar.gz
* lisp/comint.el (comint-mode-map): Replace `delete-char' with `delete-forward-char'.
Fixes: debbugs:16109
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/comint.el6
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 11dd2d69c04..805db12de4a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-12-13 Juri Linkov <juri@jurta.org>
+
+ * comint.el (comint-mode-map): Replace `delete-char' with
+ `delete-forward-char'. (Bug#16109)
+
2013-12-12 Fabián Ezequiel Gallina <fgallina@gnu.org>
* progmodes/python.el (python-indent-calculate-indentation): Fix
diff --git a/lisp/comint.el b/lisp/comint.el
index 08e8b162771..e7dff585b68 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -460,10 +460,10 @@ executed once when the buffer is created."
(define-key map "\e\C-l" 'comint-show-output)
(define-key map "\C-m" 'comint-send-input)
(define-key map "\C-d" 'comint-delchar-or-maybe-eof)
- ;; The following two are standardly aliased to C-d,
+ ;; The following two are standardly bound to delete-forward-char,
;; but they should never do EOF, just delete.
- (define-key map [delete] 'delete-char)
- (define-key map [kp-delete] 'delete-char)
+ (define-key map [delete] 'delete-forward-char)
+ (define-key map [kp-delete] 'delete-forward-char)
(define-key map "\C-c " 'comint-accumulate)
(define-key map "\C-c\C-x" 'comint-get-next-from-history)
(define-key map "\C-c\C-a" 'comint-bol-or-process-mark)