diff options
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el index bcff7ccffd3..48d9d1981af 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -1115,6 +1115,10 @@ is non-nil)." | |||
| 1115 | Info-current-file-completions nil | 1115 | Info-current-file-completions nil |
| 1116 | buffer-file-name nil) | 1116 | buffer-file-name nil) |
| 1117 | (erase-buffer) | 1117 | (erase-buffer) |
| 1118 | ;; Erase any memory of the previous coding-system, so that | ||
| 1119 | ;; info-insert-file-contents sets the buffer's encoding to | ||
| 1120 | ;; what the Info file specifies. | ||
| 1121 | (set-buffer-file-coding-system 'undecided t) | ||
| 1118 | (info-insert-file-contents filename nil) | 1122 | (info-insert-file-contents filename nil) |
| 1119 | (setq default-directory (file-name-directory filename)) | 1123 | (setq default-directory (file-name-directory filename)) |
| 1120 | (set-buffer-modified-p nil) | 1124 | (set-buffer-modified-p nil) |