branch: externals/wcheck-mode
commit e07dd1d0c3e034360d08c3856471496273a340da
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Teemu Likonen <tliko...@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)
