kill-word+

(defun kill-word+ (arg)
  (interactive "p")
  (if (looking-at "\\W")
      (kill-word arg)
    (beginning-of-thing 'word)
    (kill-word arg)))

(global-set-key (kbd "M-d") 'kill-word+)
広告を非表示にする