aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/edebug.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 9061751082d..0dcb21780e8 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -327,6 +327,7 @@ Assumes Emacs Lisp syntax is active."
327 (while (and (symbolp object) (fboundp object)) 327 (while (and (symbolp object) (fboundp object))
328 (setq object (symbol-function object))) 328 (setq object (symbol-function object)))
329 (if (or (subrp object) 329 (if (or (subrp object)
330 (byte-code-function-p object)
330 (and (listp object) 331 (and (listp object)
331 (eq (car object) 'lambda) 332 (eq (car object) 'lambda)
332 (listp (car (cdr object))))) 333 (listp (car (cdr object)))))