summaryrefslogtreecommitdiff
path: root/lisp/delsel.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2014-02-18 13:14:36 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2014-02-18 13:14:36 -0500
commitb28df58ce5da592a41c23a1563fd68446ed80aa4 (patch)
tree6c0f393f63d3751413359843b95ebaa65c449055 /lisp/delsel.el
parent7108e1c040a911dc30147784eb88e752e483e5c3 (diff)
downloademacs-b28df58ce5da592a41c23a1563fd68446ed80aa4.tar.gz
* lisp/delsel.el (delete-char): Restore incorrectly erased property.
Fixes: debbugs:16795
Diffstat (limited to 'lisp/delsel.el')
-rw-r--r--lisp/delsel.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/delsel.el b/lisp/delsel.el
index 92f60c87868..ab71e606444 100644
--- a/lisp/delsel.el
+++ b/lisp/delsel.el
@@ -181,6 +181,9 @@ See `delete-selection-helper'."
(put 'yank 'delete-selection 'yank)
(put 'clipboard-yank 'delete-selection 'yank)
(put 'insert-register 'delete-selection t)
+;; delete-backward-char and delete-forward-char already delete the selection by
+;; default, but not delete-char.
+(put 'delete-char 'delete-selection 'supersede)
(put 'reindent-then-newline-and-indent 'delete-selection t)
(put 'newline-and-indent 'delete-selection t)