From: Glenn Morris Date: Fri, 1 May 2015 15:29:18 +0000 (-0700) Subject: * lisp/emacs-lisp/ert.el (ert--special-operator-p): Fix previous. X-Git-Tag: emacs-25.0.90~2195^2~4 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b0481de73be9fb7c4839340de2b494f19041130a;p=emacs.git * lisp/emacs-lisp/ert.el (ert--special-operator-p): Fix previous. --- 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)))))