From de1effd73b4dfa8891e35905d20803b9e76c4a13 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Sun, 6 Aug 2023 15:46:58 +0200 Subject: [PATCH] ; Fix last change --- test/lisp/net/tramp-tests.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index f4938cf9a01..31d36f81740 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -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)))))) -- 2.39.2