From: Philipp Stephani <phst@google.com>
Date: Sun, 18 Apr 2021 19:43:17 +0000 (+0200)
Subject: Skip a unit test that requires an external program if necessary.
X-Git-Tag: emacs-28.0.90~2823
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d91e1a5701860b39ccf7fb081a48d90c450ab283;p=emacs.git

Skip a unit test that requires an external program if necessary.

* test/lisp/progmodes/project-tests.el (project/quoted-directory):
Skip if the 'find' program isn't available.  The 'project-files'
function uses 'find' to obtain the list of project files.
---

diff --git a/test/lisp/progmodes/project-tests.el b/test/lisp/progmodes/project-tests.el
index 23e68541b3d..6e71948477c 100644
--- a/test/lisp/progmodes/project-tests.el
+++ b/test/lisp/progmodes/project-tests.el
@@ -32,6 +32,7 @@
 (ert-deftest project/quoted-directory ()
   "Check that `project-files' deals with quoted directory
 names (Bug#47799)."
+  (skip-unless (executable-find find-program))
   (let ((directory (make-temp-file "project-tests-" :directory)))
     (unwind-protect
         (let ((project (cons 'transient (file-name-quote directory)))