aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2013-04-07 16:42:11 -0400
committerStefan Monnier2013-04-07 16:42:11 -0400
commit285c8184afc5b3ad20b21947ac4c8fee7668c516 (patch)
tree6b87510668992e55a3634aebd9ee19dd18b078f7
parente3e7b504b2b0148e62ea444300a8fb389ef39a09 (diff)
downloademacs-285c8184afc5b3ad20b21947ac4c8fee7668c516.tar.gz
emacs-285c8184afc5b3ad20b21947ac4c8fee7668c516.zip
* emacs-lisp/ert.el: Fix paren typo.
-rw-r--r--lisp/emacs-lisp/ert.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index a9c06b05028..656cb0a6a14 100644
--- a/lisp/emacs-lisp/ert.el
+++ b/lisp/emacs-lisp/ert.el
@@ -464,7 +464,7 @@ FORM-DESCRIPTION-FORM before it has called INNER-FORM."
464 "Evaluate FORM. If it returns nil, abort the current test as failed. 464 "Evaluate FORM. If it returns nil, abort the current test as failed.
465 465
466Returns the value of FORM." 466Returns the value of FORM."
467 (declare (debug t))) 467 (declare (debug t))
468 (ert--expand-should `(should ,form) form 468 (ert--expand-should `(should ,form) form
469 (lambda (inner-form form-description-form _value-var) 469 (lambda (inner-form form-description-form _value-var)
470 `(unless ,inner-form 470 `(unless ,inner-form
@@ -474,7 +474,7 @@ Returns the value of FORM."
474 "Evaluate FORM. If it returns non-nil, abort the current test as failed. 474 "Evaluate FORM. If it returns non-nil, abort the current test as failed.
475 475
476Returns nil." 476Returns nil."
477 (declare (debug t))) 477 (declare (debug t))
478 (ert--expand-should `(should-not ,form) form 478 (ert--expand-should `(should-not ,form) form
479 (lambda (inner-form form-description-form _value-var) 479 (lambda (inner-form form-description-form _value-var)
480 `(unless (not ,inner-form) 480 `(unless (not ,inner-form)