GNU Emacs For Mac OS X 24.3

Emacsの導入

2013/03/22(金)に導入しました。html/css/JavaScriptを書くのに使っています。
頻繁に使うキーバインドだけを頭に入れて使っています。

入力用キーボードは、Happy Hacking Keyboard Professional2(無刻印)を使っています。

Debian GNU/Linuxでも、使っています。

.emacsd/init.el

2013/11/24(日)現在の設定です。
様々なサイトを参考にして作成(主にコピペ)しました。

(when (>= emacs-major-version 24)
(global-linum-mode t)
(set-frame-height (next-frame) 65)
(set-frame-width (next-frame) 120)
(tool-bar-mode -1)
(setq backup-inhibited t)
(set-face-attribute 'linum nil
:foreground "#ffffff"
:height 0.8)
(setq fixed-width-use-QuickDraw-for-ascii t)
(setq mac-allow-anti-aliasing t)
(set-face-attribute 'default nil
:family "monaco"
:height 140)
(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)
'katakana-jisx0201
'("Hiragino Maru Gothic Pro" . "iso10646-1"))
(set-fontset-font
(frame-parameter nil 'font)
'mule-unicode-0100-24ff
'("monaco" . "iso10646-1"))
(set-fontset-font
(frame-parameter nil 'font)
'cyrillic-iso8859-5
'("monaco" . "iso10646-1"))
(set-fontset-font
(frame-parameter nil 'font)
'greek-iso8859-7
'("monaco" . "iso10646-1"))
(setq face-font-rescale-alist
'(("^-apple-hiragino.*" . 0.8)
(".*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))))
(add-hook 'font-lock-mode-hook
'(lambda ()
(set-face-foreground 'font-lock-comment-face "#eeeeee")
(set-face-foreground 'font-lock-string-face "#99ffff")
(set-face-foreground 'font-lock-keyword-face "#6699cc")
(set-face-foreground 'font-lock-builtin-face "#eeeeff")
(set-face-foreground 'font-lock-function-name-face "LightSkyBlue")
(set-face-foreground 'font-lock-variable-name-face "#eeeeff")
(set-face-foreground 'font-lock-type-face "PaleGreen")
(set-face-foreground 'font-lock-constant-face "Aquamarine")
(set-face-foreground 'font-lock-warning-face "Pink")
)
)
(if window-system (progn
(set-background-color "Black")
(set-foreground-color "LightGray")
(set-cursor-color "white")
(set-frame-parameter nil 'alpha 85)
))
(custom-set-variables
'(ansi-color-names-vector
 ["#2d3743" "#ff4242" "#74af68" "#dbdb95"
"#34cae2" "#008b8b" "#00ede1" "#e1e1e0"]
)
'(custom-enabled-themes (quote (manoj-dark))))
(custom-set-faces)
(setq default-frame-alist
(append (list
'(cursor-color . "snow")
'(cursor-type . bar)
)
default-frame-alist))