aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/international/mule.el5
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."
58 ;; This is buffer-local. 58 ;; This is buffer-local.
59 (setq enable-multibyte-characters t) 59 (setq enable-multibyte-characters t)
60 (insert-file-contents fullname) 60 (insert-file-contents fullname)
61 ;; We must set `buffer-file-name' for `eval-buffer' and
62 ;; `load-history'.
63 (setq buffer-file-name file)
64 ;; Make `kill-buffer' quiet. 61 ;; Make `kill-buffer' quiet.
65 (set-buffer-modified-p nil)) 62 (set-buffer-modified-p nil))
66 ;; Eval in the original buffer. 63 ;; Eval in the original buffer.
67 (eval-buffer buffer)) 64 (eval-buffer buffer nil file))
68 (let (kill-buffer-hook kill-buffer-query-functions) 65 (let (kill-buffer-hook kill-buffer-query-functions)
69 (kill-buffer buffer))) 66 (kill-buffer buffer)))
70 (let ((hook (assoc file after-load-alist))) 67 (let ((hook (assoc file after-load-alist)))