diff options
| author | Amin Bandali <bandali@gnu.org> | 2024-02-24 13:03:04 -0500 |
|---|---|---|
| committer | Amin Bandali <bandali@gnu.org> | 2024-02-24 13:03:04 -0500 |
| commit | 46d6e13705912697af373db1259fc7c773742ec2 (patch) | |
| tree | a340440ae8446498a007c041f99d48cade1fca44 | |
| parent | 40a9b1c8f2ea9b1a1276fe0c25b3a5270d534bd0 (diff) | |
| download | configs-46d6e13705912697af373db1259fc7c773742ec2.tar.gz configs-46d6e13705912697af373db1259fc7c773742ec2.tar.xz configs-46d6e13705912697af373db1259fc7c773742ec2.zip | |
Adapt eshell prompt to match my bash prompt
| -rw-r--r-- | .emacs.d/lisp/bandali-eshell.el | 33 |
1 files changed, 22 insertions, 11 deletions
diff --git a/.emacs.d/lisp/bandali-eshell.el b/.emacs.d/lisp/bandali-eshell.el index 66e7808..7bf3b4f 100644 --- a/.emacs.d/lisp/bandali-eshell.el +++ b/.emacs.d/lisp/bandali-eshell.el @@ -31,19 +31,30 @@ eshell-directory-name (b/var "eshell/") eshell-hist-ignoredups t eshell-input-filter #'eshell-input-filter-initial-space - eshell-prompt-regexp "\\(.*\n\\)*[$#] " + ;; eshell-prompt-regexp "\\(.*\n\\)*[$#] " + ;; eshell-prompt-function + ;; (lambda () + ;; (concat + ;; (propertize (format "%s@%s:" (user-login-name) (system-name)) + ;; 'face 'default) + ;; (propertize (abbreviate-file-name default-directory) + ;; 'face 'font-lock-comment-face) + ;; (propertize "\n" 'face 'default) + ;; (if (= (user-uid) 0) + ;; (propertize "#" 'face 'red) + ;; (propertize "$" 'face 'default)) + ;; (propertize " " 'face 'default))) + eshell-prompt-regexp "^[^#$\n]* [#$] ; " eshell-prompt-function (lambda () - (concat - (propertize (format "%s@%s:" (user-login-name) (system-name)) - 'face 'default) - (propertize (abbreviate-file-name default-directory) - 'face 'font-lock-comment-face) - (propertize "\n" 'face 'default) - (if (= (user-uid) 0) - (propertize "#" 'face 'red) - (propertize "$" 'face 'default)) - (propertize " " 'face 'default)))) + (concat ": " + (system-name) + ":" + (abbreviate-file-name (eshell/pwd)) + (unless (eshell-exit-success-p) + (format " [%d]" eshell-last-command-status)) + (if (= (file-user-uid) 0) " # " " $ ") + "; "))) (eval-when-compile (defvar eshell-prompt-regexp) (declare-function eshell-life-is-too-much "esh-mode") |