CocoaEmacsのコンパイルと設定

環境

ソースの取得とコンパイル

cvs -z3 -d:pserver:anonymous@cvs.savannah.gnu.org:/sources/emacs co emacs
cd emacs
./configure --with-ns --without-x
make bootstrap
make install

nextstepのなかにEmacs.appができているのでそれを/Applicationsの中に移動

フォントとメタキーとかの設定

.emacsに以下を追加

;; for Emacs23
(when (>= emacs-major-version 23)
;;metaをコマンドに割り当てる
(setq ns-command-modifier (quote meta))
;;superをoptionに割り当てる
(setq ns-alternate-modifier (quote super))
;;システムにキーを渡さない
(setq mac-pass-control-to-system nil)
(setq mac-pass-command-to-system nil)
(setq mac-pass-option-to-system nil)
(define-key global-map [ns-drag-file] 'ns-find-file)

;;フォントの設定
;;英字Monaco日本語ヒラギノ丸ゴを使う
(setq fixed-width-use-QuickDraw-for-ascii t)
 (setq mac-allow-anti-aliasing t)
 (set-face-attribute 'default nil
                     :family "Monaco"
                     :height 120)
(set-fontset-font
  (frame-parameter nil 'font)
  'japanese-jisx0208
  '("Hiragino Maru Gothic Pro" . "iso10646-1"))
 (set-fontset-font
  (frame-parameter nil 'font)
  'japanese-jisx0212
  '("Hiragino Maru Gothic Pro" . "iso10646-1"))
 (set-fontset-font
  (frame-parameter nil 'font)
  'mule-unicode-0100-24ff
  '("Lucida Grande" . "iso10646-1"))
;;日本語と英語を2:1の大きさにするための設定
;;こだわりがなければコメントアウト
;;ここから
 (setq face-font-rescale-alist
       '(("^-apple-Hiragino_Maru_Gothic_Pro.*" . 1.2)
         (".*osaka-bold.*" . 1.2)
         (".*osaka-medium.*" . 1.2)
         (".*courier-bold-.*-mac-roman" . 1.0)
         (".*monaco cy-bold-.*-mac-cyrillic" . 0.9)
         (".*monaco-bold-.*-mac-roman" . 0.9)
         ("-cdac$" . 1.3)
         ))
;;ここまで
)