branch: externals/hyperbole
commit 0089f973e91d7d4374ff66ddaeb8edca6a672aba
Author: Mats Lidell <mats.lid...@lidells.se>
Commit: GitHub <nore...@github.com>
Skip test if apropos command is not available (#464)
Useful for running test-all using silex docker-emacs images where the
apropos command is not installed.
---
ChangeLog | 6 ++++++
test/demo-tests.el | 5 +++--
2 files changed, 9 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 4e3704913f..509e69c490 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2024-02-03 Mats Lidell <ma...@gnu.org>
+
+* test/demo-tests.el (fast-demo-key-series-shell-apropos): Skip test if
+ apropos command is not available. Useful for running test-all using
+ silex docker-emacs images.
+
2024-02-01 Mats Lidell <ma...@gnu.org>
* test/hyrolo-tests.el (hyrolo-tests--hyrolo-section-header): Helper that
diff --git a/test/demo-tests.el b/test/demo-tests.el
index c25e09464d..eb773251cc 100644
--- a/test/demo-tests.el
+++ b/test/demo-tests.el
@@ -3,7 +3,7 @@
;; Author: Mats Lidell <ma...@gnu.org>
;;
;; Orig-Date: 30-Jan-21 at 12:00:00
-;; Last-Mod: 20-Jan-24 at 15:43:39 by Mats Lidell
+;; Last-Mod: 3-Feb-24 at 23:32:21 by Mats Lidell
;;
;; SPDX-License-Identifier: GPL-3.0-or-later
;;
@@ -657,7 +657,8 @@ enough files with matching mode loaded."
(ert-deftest fast-demo-key-series-shell-apropos ()
"Action key executes apropos shell command."
- (skip-unless (not noninteractive))
+ (skip-unless (and (not noninteractive)
+ (executable-find "apropos")))
(let* ((shell-file-name (executable-find "sh"))
(shell-buffer-name "*shell*")
(existing-shell-flag (get-buffer-process shell-buffer-name)))
