Mercurial > emacs

changeset 44518:952fba35f036

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(edebug-eval-defun): Don't use defconst on variables.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 12 Apr 2002 03:20:46 +0000
parents 5496c590d5ad
children 4925eba04c46
files lisp/emacs-lisp/edebug.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/edebug.el	Fri Apr 12 03:19:09 2002 +0000
+++ b/lisp/emacs-lisp/edebug.el	Fri Apr 12 03:20:46 2002 +0000
@@ -511,11 +511,11 @@
 		(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.
+    ;; same, since that gets a macroexpanded form.
     (cond ((and (eq (car form) 'defvar)
 		(cdr-safe (cdr-safe form)))
 	   ;; Force variable to be bound.
-	   (setq form (cons 'defconst (cdr form))))
+	   (makunbound (nth 1 form)))
 	  ((and (eq (car form) 'defcustom)
 		(default-boundp (nth 1 form)))
 	   ;; Force variable to be bound.