Emacs配置清单

JJCH

               
                    昨天晚上突然间发现Emacs23能使用系统的SCIM输入法了，感觉很是奇怪，之前折腾了好久都没有出来的，怎么突然就可以了呢？难道是因为安装了KDE造成的？不管怎样，有得用总比没得用好。简单记一下".emacs"的配置。
    首先是对汉字的支持，在$HOME目录下新建".Xresources"文件，添加内容如下(前提是已经安装WQY)
Emacs.Font:fontset-chinese
Emacs.Fontset-0:-*-fixed-medium-r-*-*-14-*-*-*-c-*-fontset-chinese,\
chinese-gb2312:-*-wenquanyi bitmap song-*-*-normal--*-*-*-*-*-*-iso10646-1
   
    接下来是".emacs"文件中的配置（注释以";"为行首,一般用";;"）：
    设置中文语言环境
(set-language-environment 'Chinese-GB)
    写文件的编码方式
(set-buffer-file-coding-system 'gb2312)
    新建文件的编码方式
(setq default-buffer-file-coding-system 'gb2312)
    终端方式的编码方式
(set-terminal-coding-system 'utf-8)
    键盘输入的编码方式
(set-keyboard-coding-system 'gb2312)    读取或写入文件名的编码方式
(setq file-name-coding-system 'utf-8)
    打开就启用 text 模式
(setq default-major-mode 'text-mode)
    禁用启动信息
(setq inhibit-startup-message t)    语法高亮
(global-font-lock-mode t)    打开图片显示功能
(auto-image-file-mode t)    以 y/n 替代 yes/no
(fset 'yes-or-no-p 'y-or-n-p)
    显示行列号
(column-number-mode t)    显示括号匹配
(show-paren-mode t)    显示时间，格式如下
(display-time-mode 1)
(setq display-time-24hr-format t)
(setq display-time-day-and-date t)    隐藏工具栏
(tool-bar-mode nil)    隐藏滚动条
(scroll-bar-mode nil)    光标靠近鼠标指针时，让鼠标指针自动让开
(mouse-avoidance-mode 'animate)    不要在鼠标光标出插入
(setq mouse-yank-at-point t)    高亮显示选中的区域
(transient-mark-mode t)    支持emacs和外部程序的拷贝粘贴
(setq x-select-enable-clipboard t)    在标题栏提示当前位置
(setq frame-title-format "JJCH@%b")
    显示80列就换行
(setq default-fill-column 80)    禁止终端响铃
(setq visiable-bell t)    设置tab为4个空格的宽度
(setq default-tab-width 4)
    代码折叠
(load-library "hideshow")
(add-hook 'java-mode-hook 'hs-minor-mode)
(add-hook 'perl-mode-hook 'hs-minor-mode)
(add-hook 'php-mode-hook 'hs-minor-mode)
(add-hook 'emacs-lisp-mode-hook 'hs-minor-mode)    设置个人信息
(setq user-full-name "Jiao Jiachuan")
(setq user-mail-address "HeirJoe@Gmail.com")    加载配色文件
(load-file "~/myEmacs/color-theme.el")    选择配色方案
(require 'color-theme)
(color-theme-dark-blue)    显示标签
(load-file "~/myEmacs/tabbar.el")
(require 'tabbar)
(tabbar-mode)    所有的备份文件转移到~/Backup目录下
(setq backup-directory-alist (quote (("." . "~/Backup"))))
(setq version-control t)
(setq kept-old-versions 2)
(setq kept-new-versions 5)
(setq delete-old-versions t)
(setq backup-directory-alist '(("." . "~/Backup")))
(setq backup-by-copying t)    AucTeX
(load "auctex.el" nil t t)
(load "preview-latex.el" nil t t)
(setq TeX-auto-save t)
(setq TeX-parse-self t)
(setq-default TeX-master nil)
(add-hook 'LaTeX-mode-hook 'LaTeX-install-toolbar)
(add-hook 'LaTeX-mode-hook 'turn-on-auto-fill)
(add-hook 'LaTeX-mode-hook 'turn-on-reftex)
    定义DOS格式到UNIX格式的转换命令函数
(defun dos2unix () (interactive)
(goto-char (point-min))
(while (search-forward "\r" nil t) (replace-match "")))
    有关Emacs的常用站点：
      
王垠的个人主页

Emacs 中文化指南

Emacs 中文站

GNU Emacs

               
               
               
               
               
               
               

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