diff options
Diffstat (limited to 'Emacs/.config/emacs/elisp/eshell-prompt.el')
| -rw-r--r-- | Emacs/.config/emacs/elisp/eshell-prompt.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/Emacs/.config/emacs/elisp/eshell-prompt.el b/Emacs/.config/emacs/elisp/eshell-prompt.el index ecd03c3..d0a4e91 100644 --- a/Emacs/.config/emacs/elisp/eshell-prompt.el +++ b/Emacs/.config/emacs/elisp/eshell-prompt.el @@ -82,9 +82,11 @@ number of files affected are returned in red." (defun +eshell-prompt/--git-status () "Returns a completely formatted string of form (BRANCH-NAME<CHANGES>[REMOTE-STATUS])." - (let ((git-branch (shell-command-to-string "git branch"))) - (if (or (string= git-branch "") - (not (string= "*" (substring git-branch 0 1)))) + (let ((git-branch (thread-last + (split-string (shell-command-to-string "git branch") "\n") + (cl-remove-if (lambda (s) (= (length s) 0))) + (cl-find-if (lambda (s) (string= "*" (substring s 0 1))))))) + (if (null git-branch) "" (format "(%s<%s>[%s])" |