emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Refactor doom-get-packages & doom/packages-install

Browse source
This commit is contained in:
Henrik Lissner 2017-02-08 17:57:27 -05:00
parent 5d5c3bf92e
commit 3c96d060b7
1 changed files with 4 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

9
core/autoload/packages.el
View file

@ -87,9 +87,7 @@ fed to `doom/packages-delete'."
(defun doom-get-packages-to-install ()
"Return a list of packages that aren't installed, but need to be. Used by
`doom/packages-install'."
(doom-read-packages t)
(--remove (assq (car it) package-alist)
(append doom-packages (-map 'list doom-protected-packages))))
(--remove (assq (car it) package-alist) (doom-get-packages)))
(defun doom--scrape-sexps (sym file)
(declare (indent defun))
@ -245,8 +243,9 @@ appropriate."
(mapconcat (lambda (pkg)
(format "+ %s (%s)"
(car pkg)
(cond ((plist-get (cdr pkg) :recipe) "QUELPA")
(t "ELPA"))))
(if (plist-get (cdr pkg) :recipe)
"QUELPA"
"ELPA")))
(--sort (string-lessp (symbol-name (car it))
(symbol-name (car other)))
packages)