From c24766c4d59bc7d9f583f299b1558e2356fba933 Mon Sep 17 00:00:00 2001 From: Spencer Baugh Date: Tue, 23 Mar 2021 23:11:52 -0400 Subject: [PATCH] Assert not local-variable-p after setq in let_default binding Breaking this is a likely way to break this test, so this saves a bit of time in debugging. * test/src/data-tests.el (data-tests--let-buffer-local): Add assertion to test. --- test/src/data-tests.el | 1 + 1 file changed, 1 insertion(+) diff --git a/test/src/data-tests.el b/test/src/data-tests.el index d0cb87293f0..b1e5fa0767c 100644 --- a/test/src/data-tests.el +++ b/test/src/data-tests.el @@ -358,6 +358,7 @@ comparing the subr with a much slower lisp implementation." (should (equal (symbol-value var) 42)) (should (equal (default-value var) (symbol-value var))) (set var 123) + (should (not (local-variable-p var))) (should (equal (symbol-value var) 123)) (should (equal (default-value var) (symbol-value var)))) ;bug#44733 (should (equal (symbol-value var) def)) -- 2.39.2