diff options
| -rw-r--r-- | lisp/international/mule.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index a4a1ca76e2c..8283940bd2d 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el | |||
| @@ -85,7 +85,9 @@ Return t if file exists." | |||
| 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. |