summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2015-05-01 08:29:18 -0700
committerGlenn Morris <rgm@gnu.org>2015-05-01 08:29:18 -0700
commitb0481de73be9fb7c4839340de2b494f19041130a (patch)
treeebe3bd4c1d6a824ebba0a6321bb607f79dde5b89 /lisp/emacs-lisp
parent9b909c4265e9c0394fdb7a12d9dcdc545395078c (diff)
downloademacs-b0481de73be9fb7c4839340de2b494f19041130a.tar.gz
* lisp/emacs-lisp/ert.el (ert--special-operator-p): Fix previous.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/ert.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index 384fef546ae..8dc8261365f 100644
--- a/lisp/emacs-lisp/ert.el
+++ b/lisp/emacs-lisp/ert.el
@@ -269,7 +269,7 @@ DATA is displayed to the user and should state the reason for skipping."
(defun ert--special-operator-p (thing)
"Return non-nil if THING is a symbol naming a special operator."
(and (symbolp thing)
- (let ((definition (ignore-errors (indirect-function thing))))
+ (let ((definition (indirect-function thing)))
(and (subrp definition)
(eql (cdr (subr-arity definition)) 'unevalled)))))