branch: externals/hyperbole
commit c3ee94418a96393ff2bbf6b8979e091390695d84
Merge: c19720056c f3ea2cb338
Author: Robert Weiner <r...@gnu.org>
Commit: GitHub <nore...@github.com>
Merge branch 'master' into rsw
---
ChangeLog | 5 +++++
test/hywiki-tests.el | 13 ++++++++-----
2 files changed, 13 insertions(+), 5 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 7d9be92838..bda7bc02a2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -22,6 +22,11 @@
(hywiki-word-highlighted-at-p): Add to return any highlighted wikiword ref
at point.
+2025-03-30 Mats Lidell <ma...@gnu.org>
+
+* test/hywiki-tests.el (hywiki-tests--add-find): Remove hywiki-directory
+ at end of test case.
+
2025-03-23 Mats Lidell <ma...@gnu.org>
* test/hywiki-tests.el (hywiki-tests--run-test-case): Run DSL for testing
diff --git a/test/hywiki-tests.el b/test/hywiki-tests.el
index 139f5863ba..a211ec969e 100644
--- a/test/hywiki-tests.el
+++ b/test/hywiki-tests.el
@@ -888,11 +888,14 @@ Note special meaning of `hywiki-allow-plurals-flag'."
(ert-deftest hywiki-tests--add-find ()
"Verify `hywiki-add-find'."
- (let ((hywiki-directory (make-temp-file "hywiki" t))
- (wikiword "WikiWord")
- (referent '(find . hywiki-word-grep)))
- (hywiki-add-find wikiword)
- (should (equal referent (hywiki-get-referent wikiword)))))
+ (let* ((hywiki-directory (make-temp-file "hywiki" t))
+ (wikiword "WikiWord")
+ (referent '(find . hywiki-word-grep)))
+ (unwind-protect
+ (progn
+ (hywiki-add-find wikiword)
+ (should (equal referent (hywiki-get-referent wikiword))))
+ (hy-delete-dir-and-buffer hywiki-directory))))
(ert-deftest hywiki-tests--add-global-button ()
"Verify `hywiki-add-global-button'."
