Emacs学习心得之 基础配置

Emacs学习心得之 基础配置

1.前言
2.基础配置

 

一、前言

本篇博文记录了Emacs的一些基础配置,

其中,具体配置基于博客:
http://www.tuicool.com/articles/uaUNBzN                      (Emacs 配置文件新手攻略(2014))

并参考了以下文章:
http://blog.csdn.net/blueboy82006/article/details/5309280             (在emacs中显示行号)
http://www.cnblogs.com/liyongmou/archive/2013/04/26/3044155.html#sec-1-1  (emacs自动补全插件auto-complet和yasnippet,安装、配置和扩展)
https://github.com/joaotavora/yasnippet                      (yasnippet in Github)
https://www.douban.com/group/topic/9403585/                  (大家如何在emacs里面执行命令行?)

 

二、基础配置

使用目录(~/.emacs.d/ ) 对Emacs进行简单配置,完成了如下配置:
1. 自动补完( auto-complete 和yasnippet )
2. 显示行数

配置放在 这里 ,目录结构如下

~/.emacs.d/
README.md   #请无视该文件
init.el       #Emacs会自动从init.el开始执行
lisp/       #就是加载各个插件的初始化文件的位置啦
init-xxx.el    #某初始化文件

具体配置如下:

init.el

init.el 主要就是下面几句:

(add-to-list 'load-path (expand-file-name "lisp" user-emacs-directory))

(require 'init-utils)
(require 'init-elpa)
(require 'init-yasnippet)
(require 'init-auto-complete)

//显示行数
(global-linum-mode t)

(provide 'init)

 

init-utils.el

来自 Purcell ,目的是把一些相互依赖的feature的加载顺序理顺,例如feature A依赖于feature B,则可以写成 (after-load 'B 'A) ,这样如果错误地在B之前require了A也不会影响正常启动。

;;after-load
;;例如feature A依赖于feature B,则可以写成 (after-load 'B 'A)

(defmacro after-load (feature &rest body)
  "After FEATURE is loaded, evaluate BODY."
  (declare (indent defun))
  `(eval-after-load ,feature
     '(progn ,@body)))

(provide 'init-utils)

 

init-elpa.el

也是来自 Purcell 那里截取过来的,但是去掉了很多用不上的函数。
该文件初始化Emacs的包管理系统 ELPA ,

(require 'package)

;; 增加软件包仓库
(add-to-list 'package-archives '("org" . "http://orgmode.org/elpa/"))
(when (< emacs-major-version 24)
(add-to-list 'package-archives '("gnu" . "http://elpa.gnu.org/packages/")))
(add-to-list 'package-archives '("melpa" . "http://melpa.milkbox.net/packages/"))
(add-to-list 'package-archives '("melpa-stable" . "http://melpa-stable.milkbox.net/packages/"))

;; 定义require-package函数
(defun require-package (package &optional min-version no-refresh)
"Install given PACKAGE, optionally requiring MIN-VERSION.
If NO-REFRESH is non-nil, the available package lists will not be
re-downloaded in order to locate PACKAGE."
(if (package-installed-p package min-version)
t
(if (or (assoc package package-archive-contents) no-refresh)
(package-install package)
(progn
(package-refresh-contents)
(require-package package min-version t)))))

(package-initialize)
(provide 'init-elpa)

有了ELPA,给Emacs装插件就变的非常容易了。比方说你需要一个叫 example 的插件,那么可以在 lisp/ 目录下增加一个文件 init-example.el :

;; init-example.el
(require-package 'example)
(require 'example-autoloads)
(provide 'init-example)
然后在 init.el 中加入一句 (require 'init-example) (注意这一句要放在 (require 'init-elpa) 之后)即可。

 

init-auto-complete.el 和 init-yasnippet.el

init-auto-complete.el 和 init-yasnippet.el 一起用于配置自动补完, 分别如下配置:
init-auto-complete.el:

(require-package 'auto-complete)
(require 'auto-complete-config)

(global-auto-complete-mode t)
;; 把自定义的dict加到auto-complete的字典中去
(add-to-list 'ac-dictionary-directories
(expand-file-name "lisp/custom-dicts" user-emacs-directory))
;; 按下TAB时首先缩进所在行,然后尝试补全
(setq tab-always-indent 'complete)
;; 阻止自动触发补全动作
(setq-default ac-expand-on-auto-complete nil)
(setq-default ac-auto-start nil)
;; 用TAB作为手动触发补全动作的快捷键
(ac-set-trigger-key "TAB")
;; 使用after-load来确保ac-source-yasnippet已经完成加载
(after-load 'init-yasnippet
(set-default 'ac-sources
'(ac-source-dictionary
ac-source-words-in-buffer
ac-source-words-in-same-mode-buffers
ac-source-words-in-all-buffer
ac-source-functions
ac-source-yasnippet)))
(require 'init-ac-source)

(provide 'init-auto-complete)

 

init-yasnippet.el:

(require-package 'yasnippet)
(require 'yasnippet)
;; 使用Ctrl-c k作为唯一的触发快捷键
(define-key yas-minor-mode-map (kbd "<tab>") nil)
(define-key yas-minor-mode-map (kbd "TAB") nil)
(define-key yas-minor-mode-map (kbd "C-c k") 'yas-expand)

(yas-global-mode t)

(provide 'init-yasnippet)

 

posted @ 2016-06-24 16:43  枫雪庭  阅读(4731)  评论(0编辑  收藏  举报