;; Add Packages
(defvar my/packages’(
;;下面这部分用来说明需要安装的插件包,所有的信息存储到一个变量中,后面使用。
;; —Auto-completion —
company
;; —Better Editor —
hungry-delete
swiper
counsel
smartparens
;; —Major Mode —
js2-mode
;; —Minor Mode —
nodejs-repl
exec-path-from-shell
;; —Themes —
monokai-theme
;;solarized-theme
)“Default packages”)
;; 下面这部分用到了上面定义的软件包选择变量,然后设定选中插件的值。
(setqpackage-selected-packages my/packages)
;; 定义一个函数,查看软件插件包是否安装,如果没安装返回nil
(defunmy/packages-installed-p ()
(loop for pkg inmy/packages
when (not(package-installed-p pkg)) do (return nil)
finally(return t)))
;; 有安装包没安装的话,进行处理
(unless(my/packages-installed-p)
(message"%s" “Refreshing package database…”)
(package-refresh-contents)
(dolist (pkgmy/packages)
(when (not(package-installed-p pkg))
;; 这里应该是安装动作了
(package-install pkg))))
作者:grey_csdn
来源:优快云
原文:https://blog.youkuaiyun.com/grey_csdn/article/details/79053014
版权声明:本文为博主原创文章,转载请附上博文链接!