mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-02-08 21:38:10 +00:00
Code

less hacky check for executables when loading tests

Browse Source 
* testing/org-test.el (org-test-for-executable): Less hacky check for
  executables when loading tests.
This commit is contained in:
Eric Schulte 2011-09-26 06:16:55 -06:00
parent 32cf8bf731
commit 832fd8b415
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
testing/org-test.el
View File

@ -107,7 +107,10 @@ org-test searches this directory up the directory tree.")
This can be used at the top of code-block-language specific test
files to avoid loading the file on systems without the
executable."
(unless (> (length (shell-command-to-string (format "which %s" exe))) 0)
(unless (reduce
(lambda (acc dir)
(or acc (file-exists-p (expand-file-name exe dir))))
exec-path :initial-value nil)
(throw 'missing-test-dependency exe)))
(defun org-test-buffer (&optional file)