branch: externals/buffer-env
commit 7b7e5c2a79ad3b31b465387df0ccc18a5809f9d1
Author: Augusto Stoffel <arstof...@gmail.com>
Commit: Augusto Stoffel <ast...@users.noreply.github.com>
Add option to display script name in mode line
---
buffer-env.el | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/buffer-env.el b/buffer-env.el
index 7c55f40f2f..c29da45b8d 100644
--- a/buffer-env.el
+++ b/buffer-env.el
@@ -101,7 +101,13 @@ its content."
(defcustom buffer-env-mode-line " Env"
"Mode line indicator for buffers affected by buffer-env."
- :type '(choice string (const :tag "No indicator" nil)))
+ :risky t
+ :type '(choice (const :tag "Default" " Env")
+ (const :tag "With script name"
+ (:eval (format " Env[%s]" (file-name-nondirectory
+ buffer-env-active))))
+ (const :tag "No indicator" nil)
+ sexp))
(defvar-local buffer-env-active nil
"Non-nil if a buffer-local process environment has been set.
