; Fix last change

This commit is contained in:
Michael Albinus 2023-08-06 15:46:58 +02:00
parent 7c7966862b
commit de1effd73b

View file

@ -2687,7 +2687,9 @@ This checks also `file-name-as-directory', `file-name-directory',
(let ((bfcs buffer-file-coding-system))
(should (buffer-modified-p))
(should (null (save-buffer)))
(should (eq buffer-file-coding-system bfcs)))))
(should
(eq (coding-system-get buffer-file-coding-system :mime-charset)
(coding-system-get bfcs :mime-charset))))))
;; Cleanup.
(ignore-errors (delete-file tmp-name))))))