diff options
| author | Lars Magne Ingebrigtsen | 2016-04-24 15:18:22 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2016-04-24 15:18:29 +0200 |
| commit | 331f4a638150c1ab8ae5bea86b901f32263b9192 (patch) | |
| tree | 9c230d68703861322b8252e5d2191b24ef650766 | |
| parent | 8e2e252932faf3320f72a0b62136c4606e09ebc3 (diff) | |
| download | emacs-331f4a638150c1ab8ae5bea86b901f32263b9192.tar.gz emacs-331f4a638150c1ab8ae5bea86b901f32263b9192.zip | |
Encode the shr tests files with trailing white space
| -rw-r--r-- | .gitattributes | 3 | ||||
| -rw-r--r-- | test/data/shr/li-empty.txt | 6 | ||||
| -rw-r--r-- | test/lisp/net/shr-tests.el | 3 |
3 files changed, 6 insertions, 6 deletions
diff --git a/.gitattributes b/.gitattributes index 24fe4c7acfa..13e58a87e9f 100644 --- a/.gitattributes +++ b/.gitattributes | |||
| @@ -33,9 +33,6 @@ test/etags/html-src/algrthms.html whitespace=cr-at-eol | |||
| 33 | # The upstream maintainer does not want to remove trailing whitespace. | 33 | # The upstream maintainer does not want to remove trailing whitespace. |
| 34 | doc/misc/texinfo.tex -whitespace=blank-at-eol | 34 | doc/misc/texinfo.tex -whitespace=blank-at-eol |
| 35 | 35 | ||
| 36 | # The shr test files can have trailing whitespace. | ||
| 37 | test/data/shr/*.txt -whitespace=blank-at-eol | ||
| 38 | |||
| 39 | # Some files should not be treated as text when diffing or merging. | 36 | # Some files should not be treated as text when diffing or merging. |
| 40 | *.cur binary | 37 | *.cur binary |
| 41 | *.gpg binary | 38 | *.gpg binary |
diff --git a/test/data/shr/li-empty.txt b/test/data/shr/li-empty.txt index 8320bc0097b..906fd8df8b3 100644 --- a/test/data/shr/li-empty.txt +++ b/test/data/shr/li-empty.txt | |||
| @@ -1,3 +1,3 @@ | |||
| 1 | 1 | 1 | 1%20 |
| 2 | 2 | 2 | 2%20 |
| 3 | 3 | 3 | 3%20 |
diff --git a/test/lisp/net/shr-tests.el b/test/lisp/net/shr-tests.el index 6606ec58151..ab6fc93d1a0 100644 --- a/test/lisp/net/shr-tests.el +++ b/test/lisp/net/shr-tests.el | |||
| @@ -36,6 +36,9 @@ | |||
| 36 | (cons (buffer-substring-no-properties (point-min) (point-max)) | 36 | (cons (buffer-substring-no-properties (point-min) (point-max)) |
| 37 | (with-temp-buffer | 37 | (with-temp-buffer |
| 38 | (insert-file-contents (format "data/shr/%s.txt" name)) | 38 | (insert-file-contents (format "data/shr/%s.txt" name)) |
| 39 | (while (re-search-forward "%\\([0-9A-F][0-9A-F]\\)" nil t) | ||
| 40 | (replace-match (string (string-to-number (match-string 1) 16)) | ||
| 41 | t t)) | ||
| 39 | (buffer-string)))))) | 42 | (buffer-string)))))) |
| 40 | 43 | ||
| 41 | (ert-deftest rendering () | 44 | (ert-deftest rendering () |