2011年8月30日火曜日

[emacs] text-adjust.el のインストール


全角句読点などを半角文字に一括変換してくれる.
[半角/全角] キーをタイプする回数が激減するのでかなり楽になった.

以下を参考にインストールする.

* ((<"[emacs] 全角文字と半角文字の間に自動でスペースを開ける text-adjust.el を使ってみた"|URL:http://d.hatena.ne.jp/rubikitch/20090220/text_adjust>))

 M-x install-elisp http://taiyaki.org/elisp/mell/src/mell.el
 M-x install-elisp http://taiyaki.org/elisp/text-adjust/src/text-adjust.el

text-adjust.el ファイルには以下のようにあったが,

  ;; 2) .emacs に次の 2 行を追加する.
  ;; (setq load-path (cons (expand-file-name "~/elisp") load-path))
  ;; (load "text-adjust")

以下のページを参考にした

http://quantumfluctuation.blogspot.com/2011/07/gnupack-cygwin-emacs.html

結果はこうなった.

 (add-to-list 'load-path (expand-file-name "~/.emacs.d/auto-install"))
 (load "text-adjust")

いちいちコマンドを実行するのは面倒なので
保存する際に自動実行するよう, hook も設定しておくことにする.
上記ページのコードをもとに mode の部分だけ修正しただけ.

 ;; org-mode, text-mode, yatex-mode のときには保存する際に自動的に実行
 ;; Ref.: http://quantumfluctuation.blogspot.com/2011/07/gnupack-cygwin-emacs.html
 (defun text-adjust-before-save-if-needed ()
   (when (memq major-mode
               '(org-mode text-mode yatex-mode ))
     (text-adjust-buffer)))
 (defalias 'spacer 'text-adjust-buffer)
 (add-hook 'before-save-hook 'text-adjust-before-save-if-needed)

2011年8月26日金曜日