(load-with-code-conversion):

Don't run kill-buffer-hook or kill-buffer-query-functions.

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 32eac27d0c7dbe5ffaf8e082f6c7f17341b68267..f9a9e07a3c81f22639546e30f2905bce1a48ec04 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -63,7 +63,8 @@ Return t if file exists."
              (set-buffer-modified-p nil))
            ;; Eval in the original buffer.
            (eval-buffer buffer))
-       (kill-buffer buffer))
+       (let (kill-buffer-hook kill-buffer-query-functions)
+         (kill-buffer buffer)))
       (let ((hook (assoc file after-load-alist)))
              (if hook
                  (mapcar (function eval) (cdr hook))))