From 3c39e59cd50b58797d14b0f2630abf9f98d4302d Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Thu, 8 May 2025 23:58:32 +0100
Subject: Switch to thread-last for +eshell-prompt/--git-status

---
 Emacs/.config/emacs/elisp/eshell-prompt.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'Emacs/.config/emacs/elisp')

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])"
-- 
cgit v1.2.3-13-gbd6f