2010-05-19 152 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

相關問題