Cocoa Emacs いい感じ

~/.emacs.d/init.el をカスタマイズ中。いろんなサイトから引用。

; 言語を日本語にする
(set-language-environment 'Japanese)
; 極力UTF-8とする
(prefer-coding-system 'utf-8)

; ビープ音を消す
(setq visible-bell t)
(setq ring-bell-function 'ignore)

; 行列をカラムに表示
(line-number-mode 1)
(column-number-mode 1)

;; for Drag and Drop
(define-key global-map [ns-drag-file] 'ns-find-file)

;;; *.~ とかのバックアップファイルを作らない
;(setq make-backup-files nil)

;;; .#* とかのバックアップファイルを作らない
(setq auto-save-default nil)

;;; 現在行を目立たせる．
(require 'hl-line)
(global-hl-line-mode)

;; 月/日(曜) 時刻の書式で時計を表示する。
(setq display-time-string-forms
 '(month "/" day "(" dayname ")" 24-hours ":" minutes))
(display-time)

;; 対応する括弧を強調表示 & 対応しない場合は 警告する。
(require 'paren)

;; 対応する括弧を強調表示。
(show-paren-mode t)

;; 対応しない括弧を探す。
(setq show-paren-ring-bell-on-mismatch t)

;対応する括弧が画面内になければ、括弧内を強調表示。
(setq show-paren-style 'mixed)

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(inhibit-startup-screen t))
(custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 )