日期:2014-05-17 浏览次数:20671 次
;;禁用启动信息 (setq inhibit-startup-message t) ;;显示时间 (display-time-mode t) ;;时间使用24小时制 ;;(setq display-time-24hr-format t) ;;时间显示包括日期和具体时间 ;;(setq display-time-day-and-date t) ;;时间变化频率 (setq display-time-interval 120) ;; 字体设置 ;;(set-default-font "DejaVu Sans Mono-11") ;;主要是这段设置,同样的将.emacs.d目录放在C:\Users\Jack\AppData\Roaming下, ;; 里面的设置的方式都不用改变,windows下同linux下是通用的 ;;我的emacs lisp包的路径 (add-to-list 'load-path (expand-file-name "c:/Users/Jack/AppData/Roaming/.emacs.d")) (add-to-list 'load-path "C:/Users/Jack/AppData/Roaming/.emacs.d/plugins") ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;使用主题 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'theme-settings) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;speedbar设置 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'speedbar-settings) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; cedet ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'cedet-settings) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ecb ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'ecb-settings) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;tabbar和wcy-swbuff设置 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'tabbar-settings) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; yasnippet设置 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'yasnippet-settings) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; session.el配置,这个顺序很重要,否则不管用 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'session-settings) ;; 设置tab为4个空格的宽度,而不是原来的2 (setq c-basic-offset 4) (setq default-tab-width 4) (setq-default indent-tabs-mode nil) ;;显示行号 (require 'linum) (global-linum-mode t) ;;显示列号 (column-number-mode t) (setq auto-image-file-mode t) ;让 Emacs 可以直接打开和显示图片 ;;(setq speedbar-show-unknown-files t);;可以显示所有目录以及文件,好像不管用 ;;隐藏工具栏,滚动条,菜单栏 (tool-bar-mode nil) (scroll-bar-mode nil) (menu-bar-mode nil) ;;鼠标不闪动 (blink-cursor-mode nil) ;;当指针到一个括号时,自动显示所匹配的另一个括号 (show-paren-mode t) ;;括号匹配时可以高亮显示另外一边的括号,但光标不会烦人的跳到另一个括号处 (setq show-paren-style 'parenthesis) ;;好像也没太大作用 ;;鼠标自动避开指针,如当你输入的时候,指针到了鼠标的位置,鼠标有点挡住视线了 (mouse-avoidance-mode 'animate) ;;当指针移到另一行,不要新增一行,按 C-n 或向下键时不添加新行 (setq next-line-add-newlines nil) ;;定制快捷键 ;;设置f10为显示菜单栏 (global-set-key [f10] 'menu-bar-mode) ;;跳到指定行 (define-key ctl-x-map "l" 'goto-line) ;;y/n替代yes/no (fset 'yes-or-no-p 'y-or-n-p) ;;不产生备份文件 (setq make-backup-files nil) ;;设置默认工作目录 ;;(setq default-directory "~/working/") ;;设置粘贴缓冲条目数量 (setq kill-ring-max 200) ;;支持外部程序粘贴 (setq x-select-enable-clipboard t) ;;启动最大化 (setq initial-frame-alist '((top . 0) (left . 0)(width . 167)(height . 43))) (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. '(ecb-primary-secondary-mouse-buttons (quote mouse-1--mouse-2)) '(session-use-package t nil (session))) (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. )