cocoa emacs

.emacs

;; programming
(setq c-default-style "bsd")
(setq c-basic-offset 8)

;; use space instead of tab
(setq-default indent-tabs-mode nil)

;; language
(set-language-environment 'Japanese)
(prefer-coding-system 'utf-8)

;; font
(when (>= emacs-major-version 23)
  (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
   '("monaco" . "iso10646-1"))
  (setq face-font-rescale-alist
    '(("^-apple-hiragino.*" . 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))))