* lisp/emacs-lisp/lisp-mode.el (eval-defun-2): Use eval-sexp-add-defvars.

This commit is contained in:
Stefan Monnier 2011-04-15 09:57:53 -03:00
parent 70f6144dbd
commit 6f5424852f
2 changed files with 3 additions and 1 deletions

View file

@ -844,7 +844,7 @@ Return the result of evaluation."
(end-of-defun)
(beginning-of-defun)
(setq beg (point))
(setq form (read (current-buffer)))
(setq form (eval-sexp-add-defvars (read (current-buffer))))
(setq end (point)))
;; Alter the form if necessary.
(setq form (eval-defun-1 (macroexpand form)))