aboutsummaryrefslogtreecommitdiffstats
path: root/test/src
diff options
context:
space:
mode:
authorPaul Eggert2017-08-19 17:57:00 -0700
committerPaul Eggert2017-08-19 17:57:45 -0700
commit1b8d0fe44a38c91f5bb7a819749ea1c1aa8a5a5f (patch)
tree7b5eb748715fcb21040ce7a52a620e882402d0c8 /test/src
parent83f0d60e498c9cab59e098af6d9c403631ad645c (diff)
downloademacs-1b8d0fe44a38c91f5bb7a819749ea1c1aa8a5a5f.tar.gz
emacs-1b8d0fe44a38c91f5bb7a819749ea1c1aa8a5a5f.zip
Change recent symlink tests to just test ASCII
* test/src/fileio-tests.el (fileio-tests--symlink-failure): Be less ambitious about testing non-ASCII chars and encoding errors, as there are too many portability issues.
Diffstat (limited to 'test/src')
-rw-r--r--test/src/fileio-tests.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/test/src/fileio-tests.el b/test/src/fileio-tests.el
index 75aca7d0ab8..2ef1b553ab4 100644
--- a/test/src/fileio-tests.el
+++ b/test/src/fileio-tests.el
@@ -32,11 +32,9 @@
32 (let* ((dir (make-temp-file "fileio" t)) 32 (let* ((dir (make-temp-file "fileio" t))
33 (link (expand-file-name "link" dir))) 33 (link (expand-file-name "link" dir)))
34 (unwind-protect 34 (unwind-protect
35 (let ((failure 35 (let (failure
36 (let ((default-file-name-coding-system 'utf-8-unix))
37 (try-char (unibyte-char-to-multibyte 128) link)))
38 (char 0)) 36 (char 0))
39 (while (and (not failure) (< char 300)) 37 (while (and (not failure) (< char 127))
40 (setq char (1+ char)) 38 (setq char (1+ char))
41 (unless (= char ?~) 39 (unless (= char ?~)
42 (setq failure (try-char char link)))) 40 (setq failure (try-char char link))))