;; 设置 load path
(setq load-path (cons "~/.emacs.d/elisp" load-path))
;; 在标题栏显示buffer的名字
(setq frame-title-format "emacs@%b")
;; 设置有用个人信息
(setq user-full-name "HuZhifei")
(setq user-mail-address "WisdomFusion@gmail.com")
;; 打开tabbar
(require 'tabbar)
(tabbar-mode)
;; 配色方案
(require 'color-theme)
(color-theme-robin-hood)
;; 关闭提示音
(setq visible-bell t)
;; 简化工具条
(tool-bar-mode -1)
;; 显示时间
(display-time)
;; 显示行号
(setq column-number-mode t)
;; 显示匹配的括号
(show-paren-mode t)
;; 加大kill ring，防止出错后无法回滚文档
(setq kill-ring-max 100)
;; 把fill-column设为60
(setq default-fill-column 60)
;; 不使用tab缩进
(setq-default indent-tabs-mode nil)
(setq default-tab-width 4)
;; 询问时的 yes or no 改为 y/n，减少输入量
(fset 'yes-or-no-p 'y-or-n-p)
;; 设置sentence-end可以识别中文标点
(setq sentence-end "\\([。！？]\\|……\\|[.?!][]\"')}]*\\($\\|[ \t]\\)\\)[ \t\n]*")
(setq sentence-end-double-space nil)
;; 可以递归使用minibuffer
(setq enable-recursive-minibuffers t)
;; 防止页面滚动时跳动，scroll-margin 3
(setq scroll-margin 3
scroll-conservatively 10000)
;; 把默认的major mode设置为 text-mode
(setq default-major-mode 'text-mode)
;; 括号匹配时显示另外一边的括号，而不是跳到另一个括号
(show-paren-mode t)
(setq show-paren-style 'parentheses)
;; 光标靠近鼠标指针时，让鼠标指针自动让开，别挡住视线
(mouse-avoidance-mode 'animate)
;; 让emacs可以直接打开和显示图片
(auto-image-file-mode)
;; 语法加亮
(global-font-lock-mode t)
;; 高亮显示要拷贝的区域
(transient-mark-mode t)
;; 把一些默认禁用的功能打开
(put 'set-goal-column 'disabled nil)
(put 'narrow-to-region 'disabled nil)
(put 'upcase-region 'disabled nil)
(put 'downcase-region 'disabled nil)
(put 'LaTeX-hide-environment 'disabled nil)
;; 设置备份时的版本控制
(setq version-control t)
(setq kept-new-versions 3)
(setq delete-old-versions t)
(setq kept-old-versions 2)
(setq dired-kept-versions 1)
;; 如果不想自动备份文件，可以把上面的配置注释
;; 打开下面的配置：
;;
;; 不自动生成备份文件
;; (setq-default make-backup-files nil)
;; 让 dired 可以递归地拷贝和删除目录
(setq dired-recursive-copies 'top)
(setq dired-recursive-deletes 'top)
;; 中文配置
(set-language-environment 'Chinese-GB)
(set-keyboard-coding-system 'euc-cn)
(set-clipboard-coding-system 'euc-cn)
(set-terminal-coding-system 'euc-cn)
(set-buffer-file-coding-system 'euc-cn)
(set-selection-coding-system 'euc-cn)
(modify-coding-system-alist 'process "*" 'euc-cn)
(setq default-process-coding-system
'(euc-cn . euc-cn))
(setq-default pathname-coding-system 'euc-cn)
该配置中使用了tabbar.el和color-theme.el两个emacs扩展，文件见附件
