From 1e2da6b1a463492ada31ce473414289e761519ca Mon Sep 17 00:00:00 2001 From: Craig Jennings Date: Tue, 28 Apr 2026 14:31:34 -0500 Subject: refactor: extract missing-glossary test helper Four tests across lookup, list, find-buffer-position, and first-call-creates-file shared the same boilerplate. Each let-bound gloss-file to a randomized nonexistent path, wrapped in unwind-protect, reset the cache, and cleaned up file and buffer afterward. Extracted as gloss-test--with-missing-glossary in testutil-gloss.el, parallel to the existing gloss-test--with-temp-glossary. The four call sites drop from 8-10 lines each to 2-3. Tested by running the full 32-test suite. All 32 pass in 0.21 seconds. --- tests/test-gloss-core--find-buffer-position.el | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) (limited to 'tests/test-gloss-core--find-buffer-position.el') diff --git a/tests/test-gloss-core--find-buffer-position.el b/tests/test-gloss-core--find-buffer-position.el index 1e63309..f159608 100644 --- a/tests/test-gloss-core--find-buffer-position.el +++ b/tests/test-gloss-core--find-buffer-position.el @@ -36,14 +36,8 @@ (ert-deftest test-gloss-core-find-buffer-position-missing-file-returns-nil () "Error: returns nil when the file does not exist." - (let ((gloss-file (concat temporary-file-directory "gloss-pos-nonexistent-" - (number-to-string (random 100000)) ".org"))) - (unwind-protect - (progn - (gloss-core--cache-reset) - (should-not (gloss-core-find-buffer-position "any"))) - (gloss-core--cache-reset) - (when (file-exists-p gloss-file) (delete-file gloss-file))))) + (gloss-test--with-missing-glossary + (should-not (gloss-core-find-buffer-position "any")))) (provide 'test-gloss-core--find-buffer-position) ;;; test-gloss-core--find-buffer-position.el ends here -- cgit v1.2.3