C-e を 2 回連続して実行したら、行末を trim する

http://d.hatena.ne.jp/kitokitoki/20100131/p4 を見て、似たようなのが 設定ファイルにあるので貼っておく。自分で作ったのか、どっからか引用したのか忘れた。

sequential-command.el のほうが便利か?

;; 行末に飛ぶ。連続で実行したときは、後ろについている空白とタブを削除
(defun my-end-of-line ()
  (interactive)
  (end-of-line)
  (if (eq last-command this-command)
      (delete-horizontal-space)))
(global-set-key "\C-e" 'my-end-of-line)