From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sat, 29 Aug 2020 20:34:06 +0000 (-0700)
Subject: Mark failing fileio test on MS-Windows
X-Git-Tag: emacs-28.0.90~6326
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e709c187fde76573ea3ec3a5f14e09b9ed59525f;p=emacs.git

Mark failing fileio test on MS-Windows

* test/src/fileio-tests.el (fileio-tests--HOME-trailing-slash):
Expect failure on MS-Windows.
---

diff --git a/test/src/fileio-tests.el b/test/src/fileio-tests.el
index 7baa4c7e2fa..bedda83bbdb 100644
--- a/test/src/fileio-tests.el
+++ b/test/src/fileio-tests.el
@@ -109,6 +109,9 @@ Also check that an encoding error can appear in a symlink."
 
 (ert-deftest fileio-tests--HOME-trailing-slash ()
   "Test that expand-file-name of \"~\" respects trailing slash."
+  :expected-result (if (memq system-type '(windows-nt ms-dos))
+                       :failed
+                     :passed)
   (let ((process-environment (copy-sequence process-environment)))
     (dolist (home
              (if (memq system-type '(windows-nt ms-dos))