From 4fbe173304d684ce9bfa3c20f3dea0a05031eb3f Mon Sep 17 00:00:00 2001 From: "Robert A. Burks" Date: Fri, 5 Apr 2024 16:27:08 -0400 Subject: [PATCH 32/32] ; * Removed warning suppression * test/src/eval-tests.el (eval-tests-defvaralias-errorcases): --- test/src/eval-tests.el | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/test/src/eval-tests.el b/test/src/eval-tests.el index 8627503ce27..f824d338db1 100644 --- a/test/src/eval-tests.el +++ b/test/src/eval-tests.el @@ -372,12 +372,11 @@ eval-tests-defvaralias-errorcases ;; 'defvaralias' should error if new_alias has been ;; dynamically bound by 'let', otherwise it creates the alias. (defvar eval-tests-defvaralias-error-cases-a 5) - (with-no-warnings - (let ((eval-tests-defvaralias-error-cases-a 10)) - ;; A dynamically let-bound symbol cannot be made an alias - (should-error (defvaralias - 'eval-tests-defvaralias-error-cases-a - 'load-path)))) + (let ((eval-tests-defvaralias-error-cases-a 10)) + ;; A dynamically let-bound symbol cannot be made an alias + (should-error (defvaralias + 'eval-tests-defvaralias-error-cases-a + 'load-path))) (with-temp-buffer (make-local-variable 'eval-tests-defvaralias-errorcases-a1) ;; A blv cannot be made an alias -- 2.34.1