diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-09-07 18:32:24 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-09-07 18:32:24 +0000 |
commit | 94b35ce81f93464a87a25115b2d9dfcfe62a03c6 (patch) | |
tree | 976913128fe555940b2d2579f19733c6285c48e6 | |
parent | 1e2d30ea1e1b826f1680e5a7ab991812f1327324 (diff) | |
download | emacs-94b35ce81f93464a87a25115b2d9dfcfe62a03c6.tar.gz |
(load-with-code-conversion):
Use third arg to eval-buffer and don't set buffer-file-name.
-rw-r--r-- | lisp/international/mule.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 104991bdcf7..66e82575ec4 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -58,13 +58,10 @@ Return t if file exists." ;; This is buffer-local. (setq enable-multibyte-characters t) (insert-file-contents fullname) - ;; We must set `buffer-file-name' for `eval-buffer' and - ;; `load-history'. - (setq buffer-file-name file) ;; Make `kill-buffer' quiet. (set-buffer-modified-p nil)) ;; Eval in the original buffer. - (eval-buffer buffer)) + (eval-buffer buffer nil file)) (let (kill-buffer-hook kill-buffer-query-functions) (kill-buffer buffer))) (let ((hook (assoc file after-load-alist))) |