3305 |
;; any code conversion. |
;; any code conversion. |
3306 |
(if auto-save-p 'emacs-mule-unix |
(if auto-save-p 'emacs-mule-unix |
3307 |
coding-system-for-read))) |
coding-system-for-read))) |
3308 |
|
;; This force |
3309 |
|
;; after-insert-file-set-buffer-file-coding-system |
3310 |
|
;; (called from insert-file-contents) to set |
3311 |
|
;; buffer-file-coding-system to a proper value. |
3312 |
|
(kill-local-variable 'buffer-file-coding-system) |
3313 |
|
|
3314 |
;; Note that this preserves point in an intelligent way. |
;; Note that this preserves point in an intelligent way. |
3315 |
(if preserve-modes |
(if preserve-modes |
3316 |
(let ((buffer-file-format buffer-file-format)) |
(let ((buffer-file-format buffer-file-format)) |