delete-trailing-whitespaceのセーブ時自動実行をトグルする関数

emacsにはdelete-trailing-whitespaceという関数があって、これを使うと、無駄な空白を除去してくれます。これをbefore-save-hookに登録しておくと非常に便利なのですが、たまに他の人が保存していた無駄な空白を除去しまくってgitのログがひどいことになるので、before-save-hookへの登録をトグルするelispを書いてみた。

そろそろemacsをちゃんとカスタマイズできるように、elispの勉強をしたい。