[Top][All Lists]

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

[elpa] externals/wcheck-mode 029b031 04/39: Merge branch 'master' of git

From: Teemu Likonen
Subject: [elpa] externals/wcheck-mode 029b031 04/39: Merge branch 'master' of github.com:tlikonen/wcheck-mode
Date: Sun, 4 Oct 2020 07:55:17 -0400 (EDT)

branch: externals/wcheck-mode
commit 029b031fc2e44bb529a49d774c265e0c85696dd6
Merge: 03ea5f1 011219f
Author: Teemu Likonen <tlikonen@iki.fi>
Commit: Teemu Likonen <tlikonen@iki.fi>

    Merge branch 'master' of github.com:tlikonen/wcheck-mode
    * 'master' of github.com:tlikonen/wcheck-mode:
      Allow exec-path search to find external program
 wcheck-mode.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/wcheck-mode.el b/wcheck-mode.el
index 989215d..c37882f 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -2018,10 +2018,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."
-  (when (stringp program)
-    (let ((f (executable-find program)))
-      (and (file-regular-p f)
-           (file-executable-p f)))))
+  (and (stringp program)
+       (or (and (file-regular-p program)
+                (file-executable-p program))
+           (executable-find program))))
 (defun wcheck--program-configured-p (language)

reply via email to

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