사용중인 emacs 환경설정 파일

.emacs 파일

;color
(require 'color-theme)
(setq color-theme-is-global t)
(color-theme-midnight)

;frame
(menu-bar-mode nil)
(tool-bar-mode nil)
(scroll-bar-mode nil)

;short cut
(fset 'find-next-tag "\C-u\256") ;macro for C-u M-.
(fset 'find-prev-tag "\C-u-\256") ;macro for C-u - M-.
(global-set-key "\M-]" 'find-next-tag)
(global-set-key "\M-[" 'find-prev-tag)

;font
(create-fontset-from-fontset-spec
"-*-DejaVu Sans Mono-medium-r-normal-*-12-*-*-*-m-*-iso8859-*,
korean-ksc5601:-*-gulim-medium-r-normal-*-12-*-*-*-m-*-ksc5601.1987-*"
t)
(set-face-font 'default "-*-DejaVu Sans Mono-medium-r-normal-*-12-*-*-*-m-*-iso8859-*")

;etc
(setq-default truncate-lines t)
(setq make-backup-files nil)
(setq transient-mark-mode t)
(setq default-input-method "korean-hangul3")
(setq default-korean-keybodard "3")
(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)
(global-cwarn-mode 1)
(iswitchb-mode)
(which-function-mode)
(when (fboundp 'global-font-lock-mode)
  (global-font-lock-mode t))

;cscope
(require 'xcscope)
(setq cscope-do-not-update-database t)

;highlight-current-line
;(require 'highlight-current-line)
;(highlight-current-line-on t)
;(highlight-current-line-whole-line-on nil)

;tabbar
;(require 'tabbar)
;(tabbar-mode t)
;(global-set-key [(control shift tab)] 'tabbar-backward)
;(global-set-key [(control tab)] 'tabbar-forward)