diff options
| author | NIIBE Yutaka <gniibe@fsij.org> | 2022-05-02 14:03:57 +0900 |
|---|---|---|
| committer | NIIBE Yutaka <gniibe@fsij.org> | 2022-05-02 14:03:57 +0900 |
| commit | 792374edb67698d46f003f1548e674f0c6ef8d44 (patch) | |
| tree | 5217b32fa712f8cdb8bb076722e305c4da77492d | |
| parent | 602c37ac0678d690a5b68d6c1749b8daa3d5f328 (diff) | |
tests: Fix plain invocation of "make check".
* tests/openpgp/run-tests.scm: Check if *args* is null or not.
--
Fixes-commit: ba2f2085a95be47a06ac6ba75a4c7def7c6599b2
Signed-off-by: NIIBE Yutaka <gniibe@fsij.org>
| -rw-r--r-- | tests/openpgp/run-tests.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/openpgp/run-tests.scm b/tests/openpgp/run-tests.scm index 76432b736..8f9435943 100644 --- a/tests/openpgp/run-tests.scm +++ b/tests/openpgp/run-tests.scm @@ -44,7 +44,8 @@ (string-append "--" variant)))) (define setup-use-keyboxd (setup* "use-keyboxd")) -(define use-keyboxd? (or (string=? "--use-keyboxd" (car *args*)) +(define use-keyboxd? (or (and (not (null? *args*)) + (string=? "--use-keyboxd" (car *args*))) (string=? "keyboxd" (getenv "GPGSCM_TEST_VARIANT")))) (define tests (filter (lambda (arg) (not (string-prefix? arg "--"))) *args*)) |