3223 |
coding-system-for-read))) |
coding-system-for-read))) |
3224 |
;; Note that this preserves point in an intelligent way. |
;; Note that this preserves point in an intelligent way. |
3225 |
(if preserve-modes |
(if preserve-modes |
3226 |
(let ((buffer-file-formats buffer-file-formats)) |
(let ((buffer-file-format buffer-file-format)) |
3227 |
(insert-file-contents file-name (not auto-save-p) |
(insert-file-contents file-name (not auto-save-p) |
3228 |
nil nil t)) |
nil nil t)) |
3229 |
(insert-file-contents file-name (not auto-save-p) |
(insert-file-contents file-name (not auto-save-p) |