2012年4月24日火曜日

[emacs] 現行の設定

必要になったのでここにもバックアップとして書いておこう。。
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;;  Emacs Settings
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;
;; Load Path
;;
;;(setq load-path (cons "/Users/exthirix/.emacs.d/" load-path))

;;
;; inhibit StartupScreen
;;
(custom-set-variables
 '(inhibit-startup-screen t)
)
(custom-set-faces)

;;
;; WindowSize & Colors
;;
(if window-system (progn
  (setq initial-frame-alist '((top . 20) (left . 0) (width . 100) (height . 40)))
  (set-background-color "dark slate gray")
  (set-foreground-color "LightGray")
  (set-cursor-color "Gray")
))

;;
;; Show lines, times, functions
;;
(line-number-mode t)
(display-time)
(which-function-mode 1)
(show-paren-mode 1)

;; Wheel Mouse
(mouse-wheel-mode t)
(setq mouse-wheel-follow-mouse t)

;;
;; Buffer Move
;;
(global-set-key [?\C-,] 'next-buffer)
(global-set-key [?\C-.] 'previous-buffer)

;;
;; No Make BackUp
;;
(setq backup-inhibited t)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; Editor
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;
;; For ObjectiveC
;;
(setq auto-mode-alist
(append '(("\\.h$" . objc-mode)
("\\.m$" . objc-mode))))

;;
;; For Processing
;;

(add-to-list 'load-path "~/.emacs.d/")
(autoload 'processing-mode "processing-mode" "Processing mode" t)
(add-to-list 'auto-mode-alist '("\\.pde$" . processing-mode))
(setq processing-location "/Applications/Apps/")

[Photo] 神苑ぼたん庭園

鶴岡八幡宮の神苑ぼたん庭園にて