如何在Emacs中用yank覆盖文本？

Question

我想用下面的方法覆盖文本.有没有办法做到这一点？

杀死环:

text-i-want-to-paste

之前:

abcdefghijklmnopqrstuvwxyz
^
corsor

后:

text-i-want-to-pasteuvwxyz

谢谢.

Answer 1

打开delete-selection-mode.然后选择要替换的文本.然后点击C-y.与delete-selection-mode启用,您只需键入内容,替换所选文本,像通常那样Emacs的外面.并C-y取代它.

Answer 2

您也可以使用 defadvice。那么这只会在覆盖模式打开时起作用：

(defadvice yank (before yank-if-overwrite)
  (if (bound-and-true-p overwrite-mode)
      (delete-char (length (current-kill 0))))
  )
(ad-activate 'yank)

Answer 3

这里：

(defun crazy-yank ()
  (interactive)
  (delete-char (length (current-kill 0)))
  (yank))

(global-set-key (kbd "C-M-y") 'crazy-yank)