summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/ert.el
diff options
context:
space:
mode:
authorK. Handa <handa@gnu.org>2015-05-02 22:39:54 +0900
committerK. Handa <handa@gnu.org>2015-05-02 22:39:54 +0900
commit40e720d049693dfe0c5559a8a8285a0b5cc6c5e2 (patch)
tree46b84f79be0930e7fa729ae06836b90892e3d9b5 /lisp/emacs-lisp/ert.el
parentc3c9dab41b637b53034dd2f3dce6bf042380adae (diff)
parent0bbc027356b680f32ac7b2d47d43a65d01091032 (diff)
downloademacs-40e720d049693dfe0c5559a8a8285a0b5cc6c5e2.tar.gz
emacs-40e720d049693dfe0c5559a8a8285a0b5cc6c5e2.tar.bz2
emacs-40e720d049693dfe0c5559a8a8285a0b5cc6c5e2.zip
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs
Diffstat (limited to 'lisp/emacs-lisp/ert.el')
-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)))))