diff options
author | Basil L. Contovounesios <contovob@tcd.ie> | 2020-08-19 14:43:11 +0100 |
---|---|---|
committer | Basil L. Contovounesios <contovob@tcd.ie> | 2020-08-19 15:02:43 +0100 |
commit | f8d3d18168a742691d095a3f0c83512f19621725 (patch) | |
tree | 4123ed7e8c563b25d7a65bb41c9883eb0fd38588 /test | |
parent | 90e65c826fab2092ad2099d7763538194c93e021 (diff) | |
download | emacs-f8d3d18168a742691d095a3f0c83512f19621725.tar.gz |
; Minor simplification of two recent changes
Diffstat (limited to 'test')
-rw-r--r-- | test/lisp/emacs-lisp/bytecomp-tests.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/bytecomp-tests.el b/test/lisp/emacs-lisp/bytecomp-tests.el index f62427305a0..834e3b6d914 100644 --- a/test/lisp/emacs-lisp/bytecomp-tests.el +++ b/test/lisp/emacs-lisp/bytecomp-tests.el @@ -479,8 +479,7 @@ Subtests signal errors if something goes wrong." (ert-deftest bytecomp-tests--warnings () (with-current-buffer (get-buffer-create "*Compile-Log*") (let ((inhibit-read-only t)) (erase-buffer))) - (dolist (f '(my-test0 my--test11 my--test12 my--test2)) - (fset f nil)) + (mapc #'fmakunbound '(my-test0 my--test11 my--test12 my--test2)) (test-byte-comp-compile-and-load t '(progn (defun my-test0 () |