[elpa] externals/hyperbole 30359a2e54 10/14: Merge branch 'rsw' of hyperbole into rsw

[ELPA Syncer]

branch: externals/hyperbole
commit 30359a2e54f8da4f82c9505c095d96f633e6497d
Merge: 641868cf6f c3ee94418a
Author: bw <rsw@gnu.org>
Commit: bw <rsw@gnu.org>

    Merge branch 'rsw' of hyperbole into rsw
---
 ChangeLog            |  5 +++++
 test/hywiki-tests.el | 13 ++++++++-----
 2 files changed, 13 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6d015d471d..50433ea8b1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -42,6 +42,11 @@
     (hywiki-word-highlighted-at-p): Add to return any highlighted wikiword ref
        at point.
 
+2025-03-30  Mats Lidell  <matsl@gnu.org>
+
+* test/hywiki-tests.el (hywiki-tests--add-find): Remove hywiki-directory
+    at end of test case.
+
 2025-03-23  Mats Lidell  <matsl@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 74d017c66f..7fd9d47b3a 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'."