changeset 66345:27a95070b049

(load-with-code-conversion): Pass full file name to `eval-buffer' unless preloading.
author Richard M. Stallman <rms@gnu.org>
date Sun, 23 Oct 2005 18:24:00 +0000
parents eed78bd4684c
children 37f27a66c519
files lisp/international/mule.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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.