Automatically sort the list of packages before installation

This commit is contained in:
syl20bnr 2014-09-24 23:07:59 -04:00
parent a209b6caae
commit 49194a6ead
1 changed files with 4 additions and 1 deletions

View File

@ -98,7 +98,10 @@ extension.
"Install the packages all the packages if there are not currently installed."
(interactive)
(let* ((pkg-list (ht-keys spacemacs-all-packages))
(not-installed (remove-if 'package-installed-p pkg-list))
(sorted-pkg-list (mapcar 'intern
(sort (mapcar 'symbol-name pkg-list)
'string<)))
(not-installed (remove-if 'package-installed-p sorted-pkg-list))
(not-installed-count (length not-installed)))
;; installation
(if not-installed