TakeV
/
spacemacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Display 'installing...' message in spacemacs buffer before actually installing a package

This commit is contained in:
syl20bnr 2014-10-03 00:19:49 -04:00
parent dd6310d166
commit f15e1df5dd
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
core/contribsys.el
View File

@ -122,14 +122,14 @@ extension.
(setq installed-count 0)
(dolist (pkg not-installed)
(when (not (package-installed-p pkg))
(setq installed-count (1+ installed-count))
(replace-last-line-of-spacemacs-buf
(format "--> installing %s:%s... [%s/%s]"
(ht-get spacemacs-all-packages pkg)
pkg
installed-count
not-installed-count) t)
(package-install pkg))
(setq installed-count (1+ installed-count))
(replace-last-line-of-spacemacs-buf
(format "--> installing %s:%s... [%s/%s]"
(ht-get spacemacs-all-packages pkg)
pkg
installed-count
not-installed-count) t)
(redisplay))
(append-to-spacemacs-buf "\n")))))