.emacs v1.0.1

ammer

(custom-set-variables
;; custom-set-variables was added by Custom -- don't edit or cut/paste it!
;; Your init file should contain only one such instance.
'(case-fold-search t)
'(current-language-environment "Chinese-GB")
'(default-input-method "chinese-py-punct")
'(global-font-lock-mode t nil (font-lock))
'(transient-mark-mode t))
(custom-set-faces
;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
;; Your init file should contain only one such instance.
)
;;中文
(set-keyboard-coding-system 'chinese-iso-8bit)
(set-selection-coding-system 'chinese-iso-8bit)
;; 设置地理位置
(setq calendar-latitude 39.90)
(setq calendar-longitude 116.30)
(setq calendar-location-name "Beijing")
;; 在日历中使用天干地支
(setq chinese-calendar-celestial-stem
      ["甲" "乙" "丙" "丁" "戊" "己" "庚" "辛" "壬" "癸"])
(setq chinese-calendar-terrestrial-branch
      ["子" "丑" "寅" "卯" "辰" "巳" "戊" "未" "申" "酉" "戌" "亥"])
;; 让sentence-end可以识别全角的标点符号
(setq sentence-end "\\([。！？]\\|……\\|[.?!][]\"')}]*\\($\\|[ \t]\\)\\)[ \t\n]
*")
(setq sentence-end-double-space nil)
;; 在标题栏显示buffer的名称
(setq frame-title-format "%b@Emacs")
;; 自动显示图片
(auto-image-file-mode)
(global-font-lock-mode t)
(setq display-time-24hr-format t)         ; In 24 hour format
(display-time)                     
; Display the time
(setq display-time-day-and-date t)
(setq-default auto-fill-function 'do-auto-fill)  ; Autofill in all modes
;; 窗体最大化和恢复
;;(defun w32-restore-frame ()
;;  "Restore a minimized frame"
;;  (interactive)
;;  (w32-send-sys-command 61728))
;;(defun w32-maximize-frame ()
;;  "Maximize the current frame"
;;  (interactive)
;;  (w32-send-sys-command 61488))
;;(w32-maximize-frame)  ;启动时最大化
(put 'downcase-region 'disabled nil)
(put 'upcase-region 'disabled nil)
(put 'narrow-to-region 'disabled nil)
(put 'narrow-to-page 'disabled nil)
;; for edit c program
(defun my-c-mode-common-hook ()
  ;; my customized c mode
  (setq tab-width 4
        indent-tabs-mode nil)
  (define-key c-mode-base-map [f5] 'goto-line)
  (define-key c-mode-base-map [f7] 'compile)
  (hi-lock-mode)
  (hs-minor-mode)
  (which-func-mode))
(add-hook 'c-mode-common-hook 'my-c-mode-common-hook)
               
               
               

本文来自ChinaUnix博客，如果查看原文请点：http://blog.chinaunix.net/u/15482/showart_85950.html