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

Add unicode symbols to package management output

Browse source
This commit is contained in:
Henrik Lissner 2017-12-20 20:07:46 -05:00
parent 4af354c693
commit 4e83cd516c
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 12 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

13
core/autoload/packages.el
View file

@ -354,14 +354,14 @@ package.el as appropriate."
(dolist (pkg packages)
(message! "Installing %s" (car pkg))
(doom--condition-case!
(message! " %s%s"
(message! "%s%s"
(cond ((and (package-installed-p (car pkg))
(not (doom-package-different-backend-p (car pkg))))
(dark (white "ALREADY INSTALLED")))
(dark (white "⚠ ALREADY INSTALLED")))
((doom-install-package (car pkg) (cdr pkg))
(green "DONE"))
(green "✓ DONE"))
(t
(red "FAILED")))
(red "✕ FAILED")))
(if (plist-member (cdr pkg) :pin)
(format " [pinned: %s]" (plist-get (cdr pkg) :pin))
"")))))
@ -404,8 +404,7 @@ package.el as appropriate."
(message!
(let ((result (doom-update-package (car pkg) t)))
(color (if result 'green 'red)
" %s"
(if result "DONE" "FAILED"))))))
(if result "✓ DONE" "✕ FAILED"))))))
(message! (bold (green "Finished!")))
(doom//reload-load-path)))))
@ -446,7 +445,7 @@ package.el as appropriate."
(let ((result (doom-delete-package pkg t)))
(color (if result 'green 'red)
"%s %s"
(if result "Removed" "Failed to remove")
(if result "✓ Removed" "✕ Failed to remove")
pkg)))))
(message! (bold (green "Finished!")))

12
core/core-packages.el
View file

@ -572,11 +572,11 @@ This should be run whenever init.el or an autoload file is modified. Running
(message "Deleted old autoloads.el"))
(dolist (file (reverse targets))
(message (cond ((not (doom-packages--read-if-cookies file))
"Ignoring %s")
"⚠ Ignoring %s")
((update-file-autoloads file nil doom-autoload-file)
"Nothing in %s")
"✕ Nothing in %s")
(t
"Scanned %s"))
"✓ Scanned %s"))
(file-relative-name file doom-emacs-dir)))
(let ((buf (get-file-buffer doom-autoload-file))
current-sexp)
@ -657,13 +657,13 @@ If RECOMPILE-P is non-nil, only recompile out-of-date files."
(short-name (file-relative-name target doom-emacs-dir)))
(cl-incf
(cond ((eq result 'no-byte-compile)
(message! (dark (white "Ignored %s" short-name)))
(message! (dark (white "⚠ Ignored %s" short-name)))
total-noop)
((null result)
(message! (red "Failed to compile %s" short-name))
(message! (red "✕ Failed to compile %s" short-name))
total-fail)
(t
(message! (green "Compiled %s" short-name))
(message! (green "✓ Compiled %s" short-name))
(quiet! (load target t t))
total-ok))))))
(message!