[elpa] externals/buffer-env c76e282125 3/3: Small refactoring

[ELPA Syncer]

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

    Small refactoring
---
 buffer-env.el | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

diff --git a/buffer-env.el b/buffer-env.el
index b0e9dc1d33..965a0187d8 100644
--- a/buffer-env.el
+++ b/buffer-env.el
@@ -141,19 +141,19 @@ Files marked as safe to execute are permanently stored in
 
 (defun buffer-env--locate-script ()
   "Locate a dominating file named `buffer-env-script-name'."
-  (unless (file-remote-p default-directory)
-    (cond
-     ((listp buffer-env-script-name)
-      (seq-some
-       (lambda (script-name)
-        (and-let* ((dir (locate-dominating-file default-directory
-                                               script-name)))
-          (expand-file-name script-name dir)))
-       buffer-env-script-name))
-     ((stringp buffer-env-script-name)
-      (when-let* ((dir (locate-dominating-file default-directory
-                                              buffer-env-script-name)))
-       (expand-file-name buffer-env-script-name dir))))))
+  (cond
+   ((file-remote-p default-directory) nil)
+   ((listp buffer-env-script-name)
+    (seq-some
+     (lambda (script-name)
+       (and-let* ((dir (locate-dominating-file default-directory
+                                              script-name)))
+        (expand-file-name script-name dir)))
+     buffer-env-script-name))
+   ((stringp buffer-env-script-name)
+    (when-let* ((dir (locate-dominating-file default-directory
+                                            buffer-env-script-name)))
+      (expand-file-name buffer-env-script-name dir)))))
 
 ;;;###autoload
 (defun buffer-env-update (&optional file)