diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2017-08-19 17:57:00 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2017-08-19 17:57:45 -0700 |
| commit | 1b8d0fe44a38c91f5bb7a819749ea1c1aa8a5a5f (patch) | |
| tree | 7b5eb748715fcb21040ce7a52a620e882402d0c8 /test/src/fileio-tests.el | |
| parent | 83f0d60e498c9cab59e098af6d9c403631ad645c (diff) | |
| download | emacs-1b8d0fe44a38c91f5bb7a819749ea1c1aa8a5a5f.tar.gz | |
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/fileio-tests.el')
| -rw-r--r-- | test/src/fileio-tests.el | 6 |
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 @@ (let* ((dir (make-temp-file "fileio" t)) (link (expand-file-name "link" dir))) (unwind-protect - (let ((failure - (let ((default-file-name-coding-system 'utf-8-unix)) - (try-char (unibyte-char-to-multibyte 128) link))) + (let (failure (char 0)) - (while (and (not failure) (< char 300)) + (while (and (not failure) (< char 127)) (setq char (1+ char)) (unless (= char ?~) (setq failure (try-char char link)))) |