diff options
| author | Dave Love <fx@gnu.org> | 2000-10-06 18:37:50 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2000-10-06 18:37:50 +0000 |
| commit | e75667a0bd5b42924632b0eb0ad60596a396a08e (patch) | |
| tree | 4aaa478dd295b1981368157342b41287f7e75d6e /lisp/emacs-lisp/edebug.el | |
| parent | a469e8baa83d554f8b370f24f9440b74cc858212 (diff) | |
| download | emacs-e75667a0bd5b42924632b0eb0ad60596a396a08e.tar.gz emacs-e75667a0bd5b42924632b0eb0ad60596a396a08e.tar.bz2 emacs-e75667a0bd5b42924632b0eb0ad60596a396a08e.zip | |
Comment.
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 |
1 files changed, 2 insertions, 0 deletions
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. |