# HG changeset patch # User Richard M. Stallman # Date 1130091840 0 # Node ID 27a95070b049b66f8d93f9c606279269ad8d7a5b # Parent eed78bd4684cdce653f8c428b8b92fd861dcba58 (load-with-code-conversion): Pass full file name to `eval-buffer' unless preloading. diff -r eed78bd4684c -r 27a95070b049 lisp/international/mule.el --- a/lisp/international/mule.el Sun Oct 23 18:22:49 2005 +0000 +++ b/lisp/international/mule.el Sun Oct 23 18:24:00 2005 +0000 @@ -85,7 +85,9 @@ ;; Make `kill-buffer' quiet. (set-buffer-modified-p nil)) ;; Have the original buffer current while we eval. - (eval-buffer buffer nil file + (eval-buffer buffer nil + ;; This is compatible with what `load' does. + (if purify-flag file fullname) ;; If this Emacs is running with --unibyte, ;; convert multibyte strings to unibyte ;; after reading them.