- 286 名前：270 mailto:sage [2007/07/20(金) 02:39:05 ]
- > kill-word をほんの少しいじるだけで作れる。
でけた。ほんとに簡単だった。
(defun delete-word (arg)
"Delete characters forward until encountering the end of a word.
With argument, do this that many times."
(interactive "p")
(delete-region (point) (progn (forward-word arg) (point))))
