diff options
| author | Paul Eggert | 2017-08-19 17:57:00 -0700 |
|---|---|---|
| committer | Paul Eggert | 2017-08-19 17:57:45 -0700 |
| commit | 1b8d0fe44a38c91f5bb7a819749ea1c1aa8a5a5f (patch) | |
| tree | 7b5eb748715fcb21040ce7a52a620e882402d0c8 /test/src | |
| parent | 83f0d60e498c9cab59e098af6d9c403631ad645c (diff) | |
| download | emacs-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.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 @@ | |||
| 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)))) |