2010-05-19 154 views

回答

4
(defun my-kill-word() 
    (interactive) 
    (backward-word) 
    (kill-word 1)) 

(global-set-key (kbd "M-d") 'my-kill-word) 
+0

但是,如果你在这个词的开头呢?然后它会删除前面的单词,不是吗? – 2010-05-20 09:33:29

1

一个更好的代码可能是:

(defun my-kill-word() 
    (interactive) 
    (unless (looking-at "\\<") 
    (backward-word)) 
    (kill-word 1)) 

(global-set-key (kbd "M-d") 'my-kill-word) 

所以我们向后移动,只有当我们不在这个词 的开始呢。

+0

谢谢你这个。我已经切换到它。我很享受我转换到Emacs,但elisp仍然是胡言乱语。 – 2010-05-20 14:03:42

相关问题