diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2021-09-23 14:02:21 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2021-09-25 20:25:01 +0200 |
| commit | 0b099e34dc726c3ed0e7b63028f42c2a2720ba7c (patch) | |
| tree | 4e6c5463ac3f8388286d4508fba4046631822f8d /test/lisp/emacs-lisp | |
| parent | ed02b88bbae18caad650d76876940ffb58cab554 (diff) | |
| download | emacs-0b099e34dc726c3ed0e7b63028f42c2a2720ba7c.tar.gz emacs-0b099e34dc726c3ed0e7b63028f42c2a2720ba7c.tar.bz2 emacs-0b099e34dc726c3ed0e7b63028f42c2a2720ba7c.zip | |
Use ambient lexical-binding value in ert-deftest body (bug#50738)
* lisp/emacs-lisp/ert.el (ert-deftest):
Evaluate the body of `ert-deftest` with the `lexical-binding` value of
the source file (or more precisely the value in force when the
definition is evaluated), which is what everyone expected, instead of
always using dynamic binding which is what they got until now.
* test/lisp/emacs-lisp/ert-tests.el
(ert-test-deftest-lexical-binding-t): New test.
Diffstat (limited to 'test/lisp/emacs-lisp')
| -rw-r--r-- | test/lisp/emacs-lisp/ert-tests.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/ert-tests.el b/test/lisp/emacs-lisp/ert-tests.el index 5c9696105e9..a18664bba3b 100644 --- a/test/lisp/emacs-lisp/ert-tests.el +++ b/test/lisp/emacs-lisp/ert-tests.el @@ -816,6 +816,10 @@ This macro is used to test if macroexpansion in `should' works." (should (equal (ert-test-failed-condition result) '(ert-test-failed "Boo"))))) +(ert-deftest ert-test-deftest-lexical-binding-t () + "Check that `lexical-binding' in `ert-deftest' has the file value." + (should (equal lexical-binding t))) + (provide 'ert-tests) |