История изменений
Исправление Nervous, (текущая версия) :
Ну что ж, этот день настал. Долго я терпел этот беспредел, больше не буду. Пришла пора разобраться с ним раз и навсегда!
;; https://emacs.stackexchange.com/a/37680
(defun my-delete-backward-word ()
"Deletes word backward without placing it to the kill ring."
(interactive "*")
(push-mark)
(backward-word)
(delete-region (point) (mark)))
Биндим это дело на C-<backspace> и блаженствуем. Старое поведение остаётся доступно по M-<backspace>. Зачем его навесили на несколько сочетаний? Загадка.
Исходная версия Nervous, :
Ну что ж, этот день настал. Долго я терпел этот беспредел, больше не буду. Пришла пора разобраться с ним раз и навсегда!
;; https://emacs.stackexchange.com/a/37680
(defun my-delete-backward-word ()
"Deletes word backward without placing it to the kill ring."
(interactive "*")
(push-mark)
(backward-word)
(delete-region (point) (mark)))