emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-29 495bee253fc: * test/lisp/net/tramp-tests.el (tramp-test42-utf8)


From: Michael Albinus
Subject: emacs-29 495bee253fc: * test/lisp/net/tramp-tests.el (tramp-test42-utf8): Skip for macOS.
Date: Sun, 6 Aug 2023 10:24:30 -0400 (EDT)

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

    * test/lisp/net/tramp-tests.el (tramp-test42-utf8): Skip for macOS.
---
 test/lisp/net/tramp-tests.el | 14 ++++++--------
 1 file changed, 6 insertions(+), 8 deletions(-)

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 31d36f81740..c090fec8b2a 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -2689,7 +2689,7 @@ This checks also `file-name-as-directory', 
`file-name-directory',
                (should (null (save-buffer)))
                (should
                  (eq (coding-system-get buffer-file-coding-system 
:mime-charset)
-                     (coding-system-get  bfcs :mime-charset))))))
+                     (coding-system-get bfcs :mime-charset))))))
 
        ;; Cleanup.
        (ignore-errors (delete-file tmp-name))))))
@@ -7478,14 +7478,12 @@ This requires restrictions of file name syntax."
   (skip-unless (not (tramp--test-gdrive-p)))
   (skip-unless (not (tramp--test-crypt-p)))
   (skip-unless (not (tramp--test-rclone-p)))
+  (skip-unless (not (or (eq system-type 'darwin) (tramp--test-macos-p))))
 
-  (let* ((utf8 (if (and (eq system-type 'darwin)
-                       (memq 'utf-8-hfs (coding-system-list)))
-                  'utf-8-hfs 'utf-8))
-        (coding-system-for-read utf8)
-        (coding-system-for-write utf8)
-        (file-name-coding-system
-         (coding-system-change-eol-conversion utf8 'unix)))
+  (let ((coding-system-for-read 'utf-8)
+       (coding-system-for-write 'utf-8)
+       (file-name-coding-system
+        (coding-system-change-eol-conversion 'utf-8 'unix)))
     (apply
      #'tramp--test-check-files
      (append



reply via email to

[Prev in Thread] Current Thread [Next in Thread]