[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/wcheck-mode e07dd1d 21/39: Different logic for wcheck--

From: Teemu Likonen
Subject: [elpa] externals/wcheck-mode e07dd1d 21/39: Different logic for wcheck--program-executable-p
Date: Sun, 4 Oct 2020 07:55:21 -0400 (EDT)

branch: externals/wcheck-mode
commit e07dd1d0c3e034360d08c3856471496273a340da
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Teemu Likonen <tlikonen@iki.fi>

    Different logic for wcheck--program-executable-p
 wcheck-mode.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/wcheck-mode.el b/wcheck-mode.el
index 25a8a09..e099305 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -2021,10 +2021,10 @@ a (valid) value for the KEY then query the value from
 (defun wcheck--program-executable-p (program)
   "Return non-nil if PROGRAM is executable regular file."
-  (and (stringp program)
-       (or (and (file-regular-p program)
-                (file-executable-p program))
-           (executable-find program))))
+  (when (stringp program)
+    (let ((f (executable-find program)))
+      (and (file-regular-p f)
+           (file-executable-p f)))))
 (defun wcheck--program-configured-p (language)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]