.emacs配置记录
这里记录只需要使用的最简单的配置:
(setqload-path
(cons(expand-file-name"/home/zc/.emacs.d/lisp/")load-path))
;;设置缺省模式是text,而不是基本模式
(setqdefault-major-mode'text-mode)
;;不显示工具栏
(tool-bar-modenil)
;;与其他程序互相能copy/paste
(setqx-select-enable-clipboardt)
;;把title设置为文件名@Emacs
(setqframe-title-format"%b@Emacs")
;;显示列号在下面的工具栏加上行数显示
(setqcolumn-number-modet)
;;左边显示行号
(require'linum)
(global-linum-mode1)
;设置默认的列数是110
(setqdefault-fill-column110)
;;设置kill-ring-max为200
(setqkill-ring-max200)
;;设置tab为4个空格的宽度,而不是原来的2
(setqc-basic-offset4)
(setqdefault-tab-width4)
(add-hook'text-mode-hook'turn-on-auto-fill)
(global-font-lock-modet)
;;下面的这个设置可以让光标指到某个括号的时候显示与它匹配的括号
(show-paren-modet)
(setqshow-paren-style'parentheses)
;;显示日期
(setqdisplay-time-day-and-datet)
(display-time)
;;显示时间
(setqdisplay-time-24hr-formatt)
(setqdisplay-time-day-and-datet)
(setqdisplay-time-use-mail-icont)
(setqdisplay-time-interval10)
;;防止页面滚动时跳动
(setqscroll-margin3
scroll-conservatively10000)
;;'y'for'yes','n'for'no'
(fset'yes-or-no-p'y-or-n-p)
;;代码折叠
(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)
;;如果设置为t,光标在TAB字符上会显示为一个大方块
(setqx-stretch-cursornil)
;;tabbar
(require'tabbar)
(tabbar-modet)
(define-prefix-command'lwindow-map)
(global-set-key(kbd"<M-up>")'tabbar-backward-group)
(global-set-key(kbd"<M-down>")'tabbar-forward-group)
(global-set-key(kbd"<M-left>")'tabbar-backward)
(global-set-key(kbd"<M-right>")'tabbar-forward)
;;把除了EmacsBuffer之外的文件都放成一组默认是将后缀相同的放在一个组
;(setqtabbar-buffer-groups-function
;(lambda(b)(list"AllBuffers")))
;(setqtabbar-buffer-list-function
;(lambda()
;(remove-if
;(lambda(buffer)
;(find(aref(buffer-namebuffer)0)"*"))
;(buffer-list))))
;;session
(require'session)
(add-hook'after-init-hook
'session-initialize)
;;HACK:要放在最后,免得会出现比较奇怪的现象
;;保存和恢复工作环境
;;desktop,用来保存Emacs的桌面环境—buffers、以及buffer的文件名、majormodes和位置等等
(desktop-save-mode1)
;;googlemaps
;;http://julien.danjou.info/google-maps-el.html
(require'google-maps)