From 0b79b2ace8aae013282ef814b1f4dcd75057edf7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 7 Sep 1997 18:32:24 +0000 Subject: [PATCH] (load-with-code-conversion): Use third arg to eval-buffer and don't set buffer-file-name. --- lisp/international/mule.el | 5 +---- 1 file changed, 1 insertion(+), 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))) -- 2.39.5