From: Dave Love Date: Fri, 6 Oct 2000 18:37:50 +0000 (+0000) Subject: Comment. X-Git-Tag: emacs-pretest-21.0.90~1092 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e75667a0bd5b42924632b0eb0ad60596a396a08e;p=emacs.git Comment. --- diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index f89c0d7aaa6..f7d11eda14b 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -540,6 +540,8 @@ the minibuffer." (let ((edebug-all-forms edebugging) (edebug-all-defs (eq edebug-all-defs (not edebug-it)))) (edebug-read-top-level-form)))) + ;; This should be consistent with `eval-defun-1', but not the + ;; same, since that gets a macroexpended form. (cond ((and (eq (car form) 'defvar) (cdr-safe (cdr-safe form))) ;; Force variable to be bound.