Mercurial > emacs
comparison lisp/international/mule.el @ 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 | ed770a0a7846 |
children | 527e6fc032c7 b31326248cf6 |
comparison
equal
deleted
inserted
replaced
66344:eed78bd4684c | 66345:27a95070b049 |
---|---|
83 (eq last-coding-system-used 'no-conversion))) | 83 (eq last-coding-system-used 'no-conversion))) |
84 (set-buffer-multibyte nil)) | 84 (set-buffer-multibyte nil)) |
85 ;; Make `kill-buffer' quiet. | 85 ;; Make `kill-buffer' quiet. |
86 (set-buffer-modified-p nil)) | 86 (set-buffer-modified-p nil)) |
87 ;; Have the original buffer current while we eval. | 87 ;; Have the original buffer current while we eval. |
88 (eval-buffer buffer nil file | 88 (eval-buffer buffer nil |
89 ;; This is compatible with what `load' does. | |
90 (if purify-flag file fullname) | |
89 ;; If this Emacs is running with --unibyte, | 91 ;; If this Emacs is running with --unibyte, |
90 ;; convert multibyte strings to unibyte | 92 ;; convert multibyte strings to unibyte |
91 ;; after reading them. | 93 ;; after reading them. |
92 ;; (not default-enable-multibyte-characters) | 94 ;; (not default-enable-multibyte-characters) |
93 nil t | 95 nil t |