Commit 9e7638c3 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(select-safe-coding-system):

Don't ask for confirmation of mismatch if find-file-literally was used.
parent 49c24f48
...@@ -721,7 +721,9 @@ and TO is ignored." ...@@ -721,7 +721,9 @@ and TO is ignored."
(setq coding-system buffer-file-coding-system)) (setq coding-system buffer-file-coding-system))
;; Check we're not inconsistent with what `coding:' spec &c would ;; Check we're not inconsistent with what `coding:' spec &c would
;; give when file is re-read. ;; give when file is re-read.
(unless (stringp from) ;; But don't do this if we explicitly ignored the cookie
;; by using `find-file-literally'.
(unless (or (stringp from) find-file-literally)
(let ((auto-cs (save-excursion (let ((auto-cs (save-excursion
(save-restriction (save-restriction
(widen) (widen)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment