emacs 23 用の.emacs

gistfile1.el

;; .emacs

;; enable visual feedback on selections
(setq transient-mark-mode t)

;; default to better frame titles
(setq frame-title-format
      (concat  "%b - emacs@" (system-name)))

;; default to unified diffs
(setq diff-switches "-u")

;; always end a file with a newline
(setq require-final-newline 'query)

;; python-mode
(add-hook 'python-mode-hook
          '(lambda()
             (setq indent-tabs-mode nil)))

;; not backup
(setq make-backup-files nil)

;; Japanese
(set-language-environment "Japanese")
(set-terminal-coding-system 'utf-8-dos)
(set-default-coding-systems 'utf-8-dos)
(set-buffer-file-coding-system 'utf-8-dos)

;; highlight current line
(defface my-hl-line-face
  '((((class color)
      (background dark))
     (:background "#222244"))
    (((class color)
      (background light))
     (:background "LightSteelBlue1"))
    (t
     ()))
  "*Face used by hl-line.")
(setq hl-line-face 'my-hl-line-face)
(global-hl-line-mode t)

;; display linenum
(line-number-mode t)
(column-number-mode t)

;; system settings
(setq gc-cons-threshold (* 10 gc-cons-threshold))
(setq message-log-max 10000)
(setq history-length 1000)
(setq echo-keystrokes 0.1)

;; load-path
(add-to-list 'load-path "~/.emacs.d/")
(add-to-list 'load-path "~/.emacs.d/auto-install/")

;; color-theme
(require 'color-theme)
(color-theme-initialize)
(color-theme-clarity)

;; auto-complete
(require 'auto-complete-config)
(add-to-list 'ac-dictionary-directories "~/.emacs.d//ac-dict")
(ac-config-default)

;; force emacs keybind
(require 'drill-instructor)
(setq drill-instructor-global t)

;; Anything
(require 'anything-startup)

;; auto-install
(require 'auto-install)
(setq auto-install-directory "~/.emacs.d/auto-install/")
(auto-install-update-emacswiki-package-name t)
(auto-install-compatibility-setup)