Remove timestamp from eshell-prompt and change colour of directories

This commit is contained in:
2024-10-16 16:33:13 +01:00
parent f1b4f6eed4
commit 3568ffd9d3

View File

@@ -27,7 +27,7 @@
(defvar +eshell-prompt/user-prompt "𝜆> " (defvar +eshell-prompt/user-prompt "𝜆> "
"Prompt for user to input.") "Prompt for user to input.")
(defvar +eshell-prompt/dir-colour "forestgreen") (defvar +eshell-prompt/dir-colour "skyblue")
(defvar +eshell-prompt/success-colour "forestgreen") (defvar +eshell-prompt/success-colour "forestgreen")
(defvar +eshell-prompt/failure-colour "red") (defvar +eshell-prompt/failure-colour "red")
@@ -84,7 +84,7 @@ number of files affected are returned in red."
form (BRANCH-NAME<CHANGES>[REMOTE-STATUS])." form (BRANCH-NAME<CHANGES>[REMOTE-STATUS])."
(let ((git-branch (shell-command-to-string "git branch"))) (let ((git-branch (shell-command-to-string "git branch")))
(if (or (string= git-branch "") (if (or (string= git-branch "")
(not (string= "*" (substring git-branch 0 1)))) (not (string= "*" (substring git-branch 0 1))))
"" ""
(format (format
"(%s<%s>[%s])" "(%s<%s>[%s])"
@@ -108,9 +108,7 @@ form (BRANCH-NAME<CHANGES>[REMOTE-STATUS])."
"]" "]"
(if (string= git "") (if (string= git "")
"" ""
(concat "-" git "")) (concat " " git))
"\n"
`(,(format-time-string "[%H:%M:%S]") :foreground "purple")
"\n" "\n"
(list "𝜆> " ':foreground (+eshell-prompt/--colour-on-last-command)))))) (list "𝜆> " ':foreground (+eshell-prompt/--colour-on-last-command))))))