diff options
| author | Paul Eggert | 2020-08-29 13:34:06 -0700 |
|---|---|---|
| committer | Paul Eggert | 2020-08-29 13:34:40 -0700 |
| commit | e709c187fde76573ea3ec3a5f14e09b9ed59525f (patch) | |
| tree | cb833e9bfccf6427c54ed87fb539a1b7dc556863 /test/src/fileio-tests.el | |
| parent | e2702ca5fb1af6f80800e0ba202ffecebb723eed (diff) | |
| download | emacs-e709c187fde76573ea3ec3a5f14e09b9ed59525f.tar.gz emacs-e709c187fde76573ea3ec3a5f14e09b9ed59525f.zip | |
Mark failing fileio test on MS-Windows
* test/src/fileio-tests.el (fileio-tests--HOME-trailing-slash):
Expect failure on MS-Windows.
Diffstat (limited to 'test/src/fileio-tests.el')
| -rw-r--r-- | test/src/fileio-tests.el | 3 |
1 files changed, 3 insertions, 0 deletions
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." | |||
| 109 | 109 | ||
| 110 | (ert-deftest fileio-tests--HOME-trailing-slash () | 110 | (ert-deftest fileio-tests--HOME-trailing-slash () |
| 111 | "Test that expand-file-name of \"~\" respects trailing slash." | 111 | "Test that expand-file-name of \"~\" respects trailing slash." |
| 112 | :expected-result (if (memq system-type '(windows-nt ms-dos)) | ||
| 113 | :failed | ||
| 114 | :passed) | ||
| 112 | (let ((process-environment (copy-sequence process-environment))) | 115 | (let ((process-environment (copy-sequence process-environment))) |
| 113 | (dolist (home | 116 | (dolist (home |
| 114 | (if (memq system-type '(windows-nt ms-dos)) | 117 | (if (memq system-type '(windows-nt ms-dos)) |