나의 .emacs

(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.
 '(column-number-mode t)
 '(inhibit-startup-buffer-menu t)
 '(inhibit-startup-screen t)
 '(save-place t nil (saveplace))
 '(scroll-bar-mode nil)
 '(show-paren-mode t)
 '(size-indication-mode t)
 '(tooltip-mode nil)
 '(uniquify-buffer-name-style (quote forward) nil (uniquify)))
(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.
 )

(setq make-backup-files nil)            ;; 백업 파일을 자동으로 만들지 않는다.

(setq inverse-video t)

(setq echo-keystrokes t)

(setq blink-matching-paren t)                                 ;; 자동으로 괄호 매칭 기능 활성화
(setq blink-maching-delay 2)                                  ;; 2초

;added 20090906  [B]--------------------------------------------------------------------------------
(tool-bar-mode nil)                            ; No toolbar
(setq show-paren-style 'expression)            ; Highlight text between parens
(global-hl-line-mode t)                        ; Highlight cursor line
(defalias 'yes-or-no-p 'y-or-n-p)              ; y/n instead of yes/no
(icomplete-mode t)                             ; Completion in mini-buffer
(global-set-key "\C-x\C-b" 'buffer-menu)       ; CxCb puts point on buffer list
(desktop-save-mode t)                          ; Save session before quitting
;(speedbar t)                                   ; Quick file access with bar
(iswitchb-mode t)                               ;
(which-function-mode t)
(setq ispell-dictionary "english")             ; Set ispell dictionary
(setq grep-command "grep -i -nH -e ")          ; Set grep command options

;added 20090906  [E]--------------------------------------------------------------------------------


(setq default-frame-alist
      '((top . 100)
        (left . 150)
        (Width . 90)
        (height . 40)
        (cursor-color . "white")
        (cursor-type . box)
        (foreground-color . "white")
        (background-color . "black")
        (font . "-outline-굴림체-normal-r-normal-normal-12-97-96-96-c-*-iso10646-1")))
        ;(font . "-*-Courier-normal-r-*-*-13-*-*-*-c-*-iso8859-1")))
        ;(font . "fontset-mook")))

;;라인 바로가기 키 맵핑 (M-g)
(global-set-key "\M-g" 'goto-line)

(define-key minibuffer-local-map [tab] 'minibuffer-complete)

(add-to-list 'load-path "[the path to the python-mode directory]")
(setq auto-mode-alist (cons '("\\.py$" . python-mode) auto-mode-alist))
(setq interpreter-mode-alist (cons '("python" . python-mode)
                                      interpreter-mode-alist))
(autoload 'python-mode "python-mode" "Python editing mode." t)
(global-font-lock-mode t)
(setq font-lock-maximum-decoration t)

(show-paren-mode t) ; turn on paren match highlighting

(column-number-mode t)            ;

;;-----------------------------------------------------------------------
(ido-mode t)
(setq ido-enable-flex-matching t) ; fuzzy matching is a must have
 
;; This tab override shouldn't be necessary given ido's default
;; configuration, but minibuffer-complete otherwise dominates the
;; tab binding because of my custom tab-completion-everywhere
;; configuration.
(add-hook 'ido-setup-hook
          (lambda ()
            (define-key ido-completion-map [tab] 'ido-complete)))

(autoload 'pymacs-apply "pymacs")
(autoload 'pymacs-call "pymacs")
(autoload 'pymacs-eval "pymacs" nil t)
(autoload 'pymacs-exec "pymacs" nil t)
(autoload 'pymacs-load "pymacs" nil t)
;;(eval-after-load "pymacs"
;;  '(add-to-list 'pymacs-load-path YOUR-PYMACS-DIRECTORY"))
(put 'upcase-region 'disabled nil)

(windmove-default-keybindings 'meta) ; 나뉘어진 윈도우를 Alt Key만 이용해서 이동가능

(add-to-list 'load-path "~/.emacs.d/plugins")

;;-----------------------------------------------------------------------
(require 'yasnippet) ;; not yasnippet-bundle
(yas/initialize)
(yas/load-directory "~/.emacs.d/plugins/snippets/")

(setq-default indent-tabs-mode nil)  ;; TAB을 공백으로 바꿔준다.

(require 'blank-mode) ;;

;;-----------------------------------------------------------------------
(add-to-list 'auto-mode-alist '("\\.pc$" . c-mode))

(defun my-tabbar-buffer-groups (buffer)
  "Return the list of group names BUFFER belongs to.
This function is a custom function for tabbar-mode's tabbar-buffer-groups.
This function group all buffers into 2 groups:
Those user buffer, and those emacs buffer.
Emacs buffer are those starting with “*”."
  (with-current-buffer (get-buffer buffer)
    (if (string-equal "*" (substring (buffer-name) 0 1))
        '("emacs-buffer")
        '("user-buffer"))))

(setq tabbar-buffer-groups-function 'my-tabbar-buffer-groups)

(global-set-key (kbd "C-S-") 'tabbar-backward)
(global-set-key (kbd "C-") 'tabbar-forward)
(put 'scroll-left 'disabled nil)


;;-----------------------------------------------------------------------
; 메뉴바 안보이기
(custom-set-variables
'(tool-bar-mode nil nil (tool-bar)))

;;-----------------------------------------------------------------------
; 기본 언어 설정 : 한글
 (set-language-environment "Korean")


;; By an unknown contributor
(global-set-key "%" 'match-paren)

(defun match-paren (arg)
  "Go to the matching paren if on a paren; otherwise insert %."
  (interactive "p")
  (cond ((looking-at "\\s\(") (forward-list 1) (backward-char 1))
        ((looking-at "\\s\)") (forward-char 1) (backward-list 1))
        (t (self-insert-command (or arg 1)))))

emacs_configure.zip http://www.emacswiki.org/emacs/EmacsCrashCode