在emacs中,如果选择了区域,我想将Ck绑定到kill-region; 其他杀线正常.如何配置?
kin*_*ero 12
把它放在你的.emacs中
(defun kill-line-or-region ()
"kill region if active only or kill line normally"
(interactive)
(if (region-active-p)
(call-interactively 'kill-region)
(call-interactively 'kill-line)))
(global-set-key (kbd "C-k") 'kill-line-or-region)
Run Code Online (Sandbox Code Playgroud)
这听起来像是建议的工作!
(defadvice kill-line (around kill-region-if-active activate)
(if (and (called-interactively-p) (region-active-p))
(kill-region (region-beginning) (region-end))
ad-do-it))
Run Code Online (Sandbox Code Playgroud)
编辑:添加called-interactively-p检查.