登 录
(custom-set-variables<br /> ;; custom-set-variables was added by Custom.<br /> ;; If you edit it by hand, you could mess it up, so be careful.<br /> ;; Your init file should contain only one such instance.<br /> ;; If there is more than one, they won't work right.<br /> '(column-number-mode t)<br /> '(display-time-mode t)<br /> '(global-linum-mode t)<br /> '(show-paren-mode t nil (paren))<br /> '(size-indication-mode t)<br /> '(transient-mark-mode nil))<br /> (custom-set-faces<br /> ;; custom-set-faces was added by Custom.<br /> ;; If you edit it by hand, you could mess it up, so be careful.<br /> ;; Your init file should contain only one such instance.<br /> ;; If there is more than one, they won't work right.<br /> '(default ((t (:inherit nil :stipple nil :background "#7a7a7a" :foreground "#0d0d0d" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 102 :width normal :foundry "apple" :family "Monaco")))))<br /> ;我的Emacs配置;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;http://alexpogosyan.com/color-theme-creator/<br /> (defun my-color-theme ()<br /> (interactive)<br /> (color-theme-install<br /> '(my-color-theme<br /> ((background-color . "#7a7a7a")<br /> (background-mode . light)<br /> (border-color . "#a1a399")<br /> (cursor-color . "#000000")<br /> (foreground-color . "#0d0d0d")<br /> (mouse-color . "black"))<br /> (fringe ((t (:background "#a1a399"))))<br /> (mode-line ((t (:foreground "#f8f6f6" :background "#726e6e"))))<br /> (region ((t (:background "#e3a0a0"))))<br /> (font-lock-builtin-face ((t (:foreground "#d8189b"))))<br /> (font-lock-comment-face ((t (:foreground "#0f950f"))))<br /> (font-lock-function-name-face ((t (:foreground "#d9bb0d"))))<br /> (font-lock-keyword-face ((t (:foreground "#0d1191"))))<br /> (font-lock-string-face ((t (:foreground "#dc2409"))))<br /> (font-lock-type-face ((t (:foreground"#510b0c"))))<br /> (font-lock-variable-name-face ((t (:foreground "#cb5206"))))<br /> (minibuffer-prompt ((t (:foreground "#0b35bc" :bold t))))<br /> (font-lock-warning-face ((t (:foreground "Red" :bold t))))<br /> )))<br /> (provide 'my-color-theme)<br /> (add-to-list 'load-path "/usr/local/share/emacs/my_plus");自己的插件包<br /> (require 'color-theme);主题颜色<br /> ;(color-theme-initialize)<br /> (my-color-theme)<br /> ;(color-theme-dark-blue)<br /> (require 'setnu);第行前显示行号<br /> (setnu-mode t)<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;;设置颜色;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;(set-cursor-color "Wheat")<br /> ;(set-mouse-color "Wheat")<br /> ;(set-foreground-color "Wheat")<br /> ;(set-background-color "DarkSlateGray");DarkSlateGray<br /> ;;设置时间格式;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> (display-time-mode t)<br /> (setq display-time-12hr-format t)<br /> (setq display-time-day-and-date t)<br /> (setq visible-bell t);关闭出错提示声<br /> (setq inhibit-startup-message t);关闭开启画面<br /> (setq backup-inhibited t);;不产生备份<br /> (setq auto-save-default nil);不生成名为#filename#的临时文件<br /> (setq default-major-mode 'text-mode);;设置默认模式是text mode<br /> (global-font-lock-mode t);语法高亮<br /> (auto-image-file-mode t);打开图片显示功能<br /> (setq x-select-enable-clipboard t);支持emacs和外部程序的粘贴<br /> (setq frame-title-format '("" buffer-file-name));标题栏显示buffer名<br /> (setq default-directory "/home/blueboy/Program");设置缺省目录<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;;鼠标滚轮，默认的滚动太快，这里改为3行;;;;;;<br /> (defun up-slightly () (interactive) (scroll-up 3))<br /> (defun down-slightly () (interactive) (scroll-down 3))<br /> (global-set-key [mouse-4] 'down-slightly)<br /> (global-set-key [mouse-5] 'up-slightly)<br /> ;;自定义按键;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> (global-set-key [f1] 'shell);F1进入Shell<br /> (global-set-key [C-f5] 'previous-error)<br /> (global-set-key [f5] 'next-error)<br /> (global-set-key [C-f3] 'python-shell);F3进入Python-Shell<br /> (global-set-key [C-f6] 'gdb);调试<br /> (setq compile-command "make -f Makefile")<br /> (global-set-key [f7] 'compile);F7编译文件<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;;Python配置;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;(require 'python-mode)<br /> (setq auto-mode-alist<br /> (cons '("//.py$" . python-mode) auto-mode-alist)<br /> );自动关联文件<br /> (setq interpreter-mode-alist<br /> (cons '("python" . python-mode)<br /> interpreter-mode-alist)<br /> )<br /> (autoload 'python-mode "python-mode" "Python editing mode." t)<br /> ;;C语言配置;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> (defun linux-c-mode()<br /> ;;;将回车代替C-j的功能，换行的同时对齐;;;;;;<br /> (define-key c-mode-map [return] 'newline-and-indent)<br /> (interactive)<br /> (c-set-style "k&r");设置C程序的对齐风格<br /> ;(c-toggle-auto-state);在此种模式下当你键入{时，会自动根据你设置的对齐风格对齐<br /> (c-toggle-hungry-state);此模式下，当按Backspace时会删除最多的空格,使得if缩进正常<br /> (setq c-basic-offset 4);缩进设置为4<br /> (imenu-add-menubar-index);在菜单中加入当前Buffer的函数索引<br /> (which-function-mode);在状态条上显示当前光标在哪个函数体内部<br /> )<br /> ;;C++语言配置;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> (defun linux-cpp-mode ()<br /> (define-key c++-mode-map [return] 'newline-and-indent)<br /> (interactive)<br /> (c-set-style "Stroustrup")<br /> (setq c-basic-offset 4)<br /> ;(c-toggle-auto-state)<br /> (c-toggle-hungry-state)<br /> (imenu-add-menubar-index)<br /> (which-function-mode)<br /> )<br /> (add-hook 'c-mode-hook 'linux-c-mode)<br /> (add-hook 'c++-mode-hook 'linux-cpp-mode)<br /> (setq imenu-sort-function 'imenu--sort-by-name);设置imenu的排序方式为按名称排序<br /> (setq auto-mode-alist<br /> (append '(("//.h$" . c++-mode)) auto-mode-alist))<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;;配置星际译王<br /> ;;如果选中了region 就查询 region 的内容，否则查询当前光标所在的单词<br /> ;;按 q 可以把这个 buffer 放到 buffer 列表末尾，按 d 可以查询单词<br /> (global-set-key (kbd "C-c d") 'kid-sdcv-to-buffer)<br /> (defun kid-sdcv-to-buffer()<br /> (interactive)<br /> (let((word (if mark-active<br /> (buffer-substring-no-properties (region-beginning) (region-end))<br /> (current-word nil t))))<br /> (setq word (read-string (format "Search the dictionary for (default %s): " word) nil nil word))<br /> (set-buffer (get-buffer-create "*sdcv*"))<br /> (buffer-disable-undo)<br /> (erase-buffer)<br /> (let((process (start-process-shell-command "sdcv" "*sdcv*" "sdcv" "-n" word)))<br /> (set-process-sentinel<br /> process<br /> (lambda(process signal)<br /> (when(memq (process-status process) '(exit signal))<br /> (unless(string=(buffer-name) "*sdcv*")<br /> (setq kid-sdcv-window-configuration (current-window-configuration))<br /> (switch-to-buffer-other-window "*sdcv*")<br /> (local-set-key (kbd "d") 'kid-sdcv-to-buffer)<br /> (local-set-key (kbd "q")<br /> (lambda()<br /> (interactive)<br /> (bury-buffer)<br /> (unless(null (cdr (window-lis t)));only one window<br /> (delete-window)))))<br /> (goto-char (point-min))))))))<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;;CEDET conf<br /> (load-file "/home/blueboy/下载/cedet-1.0pre7/common/cedet.el")<br /> (semantic-load-enable-code-helpers)<br /> ;ecb conf<br /> (add-to-list 'load-path "/home/blueboy/ecb-2.32")<br /> (require 'ecb)<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br /> ;鼠标左键单击一个函数或变量名，在“*preview*" buffer中显示出函数或变量的定义<br /> ;鼠标中键点击一个函数或变量名，在“*preview*" buffer中显示出函数或变量被调用的地方<br /> ;当跳转到一个函数的定义后，单击鼠标右键可以返回到跳转前的地方<br /> (require 'yp-preview)<br /> (pv-enable)<br /> (defun my-pv-c-map ()<br /> (interactive)<br /> (define-key c-mode-map [mouse-1] 'pv-find-def-and-delay)<br /> (define-key c-mode-map [mouse-2] 'pv-find-ref-or-paste)<br /> (define-key c-mode-map [mouse-3] 'pv-pop-mark)<br /> )<br /> (add-hook 'c-mode-hook 'my-pv-c-map)<br /> (add-hook 'c++-mode-hook 'my-pv-c-map)<br /> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
抱歉!评论已关闭.