;;;; 关闭启动画面 (setq inhibit-startup-message t) ;;;;不要生成临时文件 (setq-default make-backup-files nil) ;;;;不要总是没完没了的问yes or no, 为什么不能用 y/n (fset 'yes-or-no-p 'y-or-n-p) ;;;;显示匹配的括号 (show-paren-mode t) (setq show-paren-style 'parentheses) ;;;;像Windows下编辑器那样, 高亮显示要拷贝的区域 (transient-mark-mode t) ;;;;不要滚动栏 (scroll-bar-mode nil) ;;;; 显示列号 (setq column-number-mode t) ;;;;不要在鼠标点击的地方插入剪贴板的内容 (setq mouse-yank-at-point t) ;;;;光标靠近鼠标指针时,让鼠标指针自动让开,别挡住视线。 (mouse-avoidance-mode 'animate) ;;;; 显示时间 (setq display-time-24hr-format t) (setq display-time-day-and-date t) (display-time) ;;;滚轮支持 (setq mouse-wheel-mode t) ;;;;python模块配置 (setq load-path (cons "~/.myemacs/" load-path)) ;;;;py后缀的文件和pyhton-mod关联 (setq auto-mode-alist (cons '("\\.py$" . python-mode) auto-mode-alist)) (setq interpreter-mode-alist (cons '("python" . python-mode) interpreter-mode-alist)) ;;;;自动加载,将 python-mode 和文件 python-mode.elc关联 (autoload 'python-mode "python-mode" "Python editing mode." t) ;;;;语法加亮 (global-font-lock-mode t) (setq font-lock-maximum-decoration t) ;;;;颜色主题设置 (require 'color-theme) (color-theme-initialize) (color-theme-blue-sea) 原始连接 |