emacs-29 de1effd73b4: ; Fix last change

[Michael Albinus]

branch: emacs-29
commit de1effd73b4dfa8891e35905d20803b9e76c4a13
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    ; 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))))))