diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-08-13 15:08:35 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-08-13 15:08:35 +0200 |
| commit | 27eff3bb8a4e06ed07208243f820b375eae3d042 (patch) | |
| tree | 683135b7ec18c846ad6c28ec86db772d08da866a /test | |
| parent | e1e44d43daf78c5fc83a8bcc8d29613d4fc56175 (diff) | |
let mod for ert-helper.el
Diffstat (limited to 'test')
| -rw-r--r-- | test/ert-helper.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/test/ert-helper.el b/test/ert-helper.el index 4e634b0..5acdc68 100644 --- a/test/ert-helper.el +++ b/test/ert-helper.el @@ -15,9 +15,13 @@ (load-file "lisp/mastodon-async.el") ;; load tests in bulk to avoid using deprecated `cask exec' -(let ((tests (cl-remove-if-not (lambda (x) - (string-suffix-p "-tests.el" x)) - (directory-files "test/." t directory-files-no-dot-files-regexp)))) +(let* ((all-test-files + (directory-files "test/." t directory-files-no-dot-files-regexp)) + (tests + (cl-remove-if-not + (lambda (x) + (string-suffix-p "-tests.el" x)) + all-test-files))) (mapc #'load-file tests)) |