Commit d62e5bf2 authored by Glenn Morris's avatar Glenn Morris
Browse files

(elint-add-required-env): Revert to not using temp-buffers (2009-09-12).

parent 7d0105e5
2009-09-14 Glenn Morris <rgm@gnu.org>
* emacs-lisp/elint.el (elint-add-required-env): Revert to not using
temp-buffers (2009-09-12).
2009-09-13 Stefan Monnier <monnier@iro.umontreal.ca>
* textmodes/ispell.el (ispell-command-loop): Improve last fix, using
......
......@@ -352,14 +352,17 @@ Return nil if there are no more forms, t otherwise."
(message nil)
(if lib
(save-excursion
;;; (set-buffer (find-file-noselect lib))
;;; (elint-update-env)
;;; (setq env (elint-env-add-env env elint-buffer-env)))
(with-temp-buffer
(insert-file-contents lib)
(with-syntax-table emacs-lisp-mode-syntax-table
(elint-update-env))
(setq env (elint-env-add-env env elint-buffer-env))))
;; FIXME this doesn't use a temp buffer, because it
;; stores the result in buffer-local variables so that
;; it can be reused.
(set-buffer (find-file-noselect lib))
(elint-update-env)
(setq env (elint-env-add-env env elint-buffer-env)))
;;; (with-temp-buffer
;;; (insert-file-contents lib)
;;; (with-syntax-table emacs-lisp-mode-syntax-table
;;; (elint-update-env))
;;; (setq env (elint-env-add-env env elint-buffer-env))))
;;(message "Elint processed (require '%s)" name))
(error "Unable to find require'd library %s" name)))
(error
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment