(elint-add-required-env): Revert to not using temp-buffers (2009-09-12).
This commit is contained in:
parent
7d0105e573
commit
d62e5bf28f
2 changed files with 16 additions and 8 deletions
|
@ -1,3 +1,8 @@
|
|||
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
|
||||
|
|
Loading…
Add table
Reference in a new issue