branch: externals/buffer-env
commit 60f6dc6ddf66ae13e606d4f4ce36871a3fef81a5
Author: Augusto Stoffel <arstof...@gmail.com>
Commit: Augusto Stoffel <arstof...@gmail.com>
Buttonize text in buffer-env-describe
---
buffer-env.el | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/buffer-env.el b/buffer-env.el
index 56ab23442d..20c0a13873 100644
--- a/buffer-env.el
+++ b/buffer-env.el
@@ -293,9 +293,11 @@ See script output in %s for more information."
(called-interactively-p 'interactive))
(with-help-window (help-buffer)
(with-current-buffer standard-output
- (insert "The process environment of buffer ‘" (buffer-name buffer)
- "’ was generated by the script ‘" script "’.")
- (fill-paragraph)
+ (insert "The process environment of "
+ (buttonize (buffer-name buffer) #'pop-to-buffer buffer)
+ " is buffer local.\nIt was generated by "
+ (buttonize (abbreviate-file-name script) #'find-file script)
+ ".")
(insert "\n\nOnly in the local process environment:\n")
(if-let ((vars (seq-difference local global)))
(dolist (var vars) (insert " " var ?\n))
