From 782aeb0cc504e48276135b9a0a750af2c58a6a6e Mon Sep 17 00:00:00 2001
From: Spencer Williams <spnw@plexwave.org>
Date: Wed, 16 Apr 2025 14:21:06 -0400
Subject: Add warning regarding tests
---
lisp/seam-test.el | 2 ++
1 file changed, 2 insertions(+)
(limited to 'lisp/seam-test.el')
diff --git a/lisp/seam-test.el b/lisp/seam-test.el
index 791c964..cf4f219 100644
--- a/lisp/seam-test.el
+++ b/lisp/seam-test.el
@@ -66,6 +66,8 @@
(let ,options
(let ,(cl-loop for (name . args) in varlist
collect `(,name (seam-make-note ,@args)))
+ ;; FIXME: It's quite possible for tests to fail in such a way
+ ;; that this does not kill the buffers.
(unwind-protect (progn ,@body)
(mapcar #'kill-buffer (list ,@(mapcar #'car varlist))))))))
--
cgit v1.2.3