[elpa] externals/buffer-env a12a914cd5 05/12: No message for hidden buffers

[ELPA Syncer]

branch: externals/buffer-env
commit a12a914cd55b068ca327d86184b00bc4daddb1be
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    No message for hidden buffers
---
 buffer-env.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/buffer-env.el b/buffer-env.el
index b84bdac59f..0bc3778168 100644
--- a/buffer-env.el
+++ b/buffer-env.el
@@ -111,6 +111,7 @@ Files marked as safe to execute are permanently stored in
                                          buffer-env-safe-files))))))
 
 (defun buffer-env--locate-script ()
+  "Locate a dominating file named `buffer-env-script-name'."
   (when-let* ((dir (and (stringp buffer-env-script-name)
                         (not (file-remote-p default-directory))
                         (locate-dominating-file default-directory
@@ -159,9 +160,10 @@ When called interactively, ask for a FILE."
     (when-let* ((path (getenv "PATH")))
       (setq-local exec-path (append (split-string path path-separator)
                                     buffer-env-extra-exec-path)))
-    (message "[buffer-env] Environment of buffer `%s' set from `%s'"
-             (buffer-name)
-             file)))
+    (unless (string-prefix-p " " (buffer-name (current-buffer)))
+      (message "[buffer-env] Environment of `%s' set from `%s'"
+               (current-buffer)
+               file))))
 
 ;;;###autoload
 (defun buffer-env-reset ()