dbo/.emacs.d
dbo
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

[eshell] Fix prompt coloring

This commit is contained in:
Daniel - 2019-10-05 17:57:32 +02:00
parent 11146c3a9b
commit 2f3844856b
No known key found for this signature in database
GPG Key ID: 1C7071A75BB72D64
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
site-lisp/db-eshell.el
View File

@ -26,15 +26,17 @@
"
(let ((head-face '(:foreground "#859900")))
(format (concat (propertize "┌─" 'face head-face)
"%s@%s %s\n"
(propertize "└─" 'face head-face)
(if (zerop (user-uid)) "#" "$")
(propertize " " 'face '(:weight bold)))
(concat (propertize "┌─" 'face head-face)
(user-login-name)
"@"
(system-name)
" "
(propertize (abbreviate-file-name (eshell/pwd))
'face '(:foreground "#dc322f")))))
'face '(:foreground "#dc322f"))
"\n"
(propertize "└─" 'face head-face)
(if (zerop (user-uid)) "#" "$")
(propertize " " 'face '(:weight bold)))))
(defun eshell/gst (&rest args)
(magit-status (pop args) nil)