aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGemini Lasswell2017-02-04 13:18:29 +0200
committerEli Zaretskii2017-02-04 13:18:29 +0200
commit8ba27b7ce2f4a98e3c14fe752042c60fd7576fef (patch)
treeb94045cfb42c99d5dfe93d62cbe2970557687aee
parenta46a61904de6cc57e6a740a3006f48023859a1b3 (diff)
downloademacs-8ba27b7ce2f4a98e3c14fe752042c60fd7576fef.tar.gz
emacs-8ba27b7ce2f4a98e3c14fe752042c60fd7576fef.zip
Avoid invalid read syntax errors due to 'ert-with-test-buffer'
* lisp/emacs-lisp/ert-x.el (ert-with-test-buffer): Fix the 'declare' form. (Bug#24722)
-rw-r--r--lisp/emacs-lisp/ert-x.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/ert-x.el b/lisp/emacs-lisp/ert-x.el
index 7d99cb30274..8530253d5b4 100644
--- a/lisp/emacs-lisp/ert-x.el
+++ b/lisp/emacs-lisp/ert-x.el
@@ -97,7 +97,7 @@ To be used in ERT tests. If BODY finishes successfully, the test
97buffer is killed; if there is an error, the test buffer is kept 97buffer is killed; if there is an error, the test buffer is kept
98around on error for further inspection. Its name is derived from 98around on error for further inspection. Its name is derived from
99the name of the test and the result of NAME-FORM." 99the name of the test and the result of NAME-FORM."
100 (declare (debug ((form) body)) 100 (declare (debug ((":name" form) body))
101 (indent 1)) 101 (indent 1))
102 `(ert--call-with-test-buffer ,name-form (lambda () ,@body))) 102 `(ert--call-with-test-buffer ,name-form (lambda () ,@body)))
103 103