[Emacs]Astyle を使う

1. Artistic Style - Index の Download から AStyle_1.24_windows.zip (2010/10/14 現在) をダウンロードする。
2. PATH の通った場所に解凍したファイル内にある AStyle.exe を移動する。
3. .emacs に以下を追記

   ;;; ===== astyle =====
   (defun astyle-this-buffer(pmin pmax opt)
           (interactive "r
   sInsert options (ex. --mode=c --indent=tab --indent-cases --brackets=linux): ")
           (message "pmin:%d pmax:%d str:%s" pmin pmax opt)
           (setq cmd (concat "astyle.exe " opt))
           (message "cmd:%s" cmd)
           (shell-command-on-region pmin pmax
           cmd
           (current-buffer) t
           (get-buffer-create "*Astyle Errors*") t
           )
   )

4. バッファを選択して M-x astyle-this-buffer を実行すると astyle.exe に渡す option を聞かれるので入力する。