Mercurial > hg > xemacs-beta
changeset 4396:e97f16fb2e25
Don't assume lisp-tests.el will be correctly read as UTF-8.
2008-01-15 Aidan Kehoe <kehoea@parhasard.net>
* automated/lisp-tests.el (literal-with-uninterned):
Use ?\x syntax for Latin-1 characters, don't assume that the file
will be read as UTF-8.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Tue, 15 Jan 2008 22:59:28 +0100 |
| parents | b03b5e362fcf |
| children | 9e28067e3083 |
| files | tests/ChangeLog tests/automated/lisp-tests.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/tests/ChangeLog Tue Jan 15 21:35:41 2008 +0100 +++ b/tests/ChangeLog Tue Jan 15 22:59:28 2008 +0100 @@ -1,3 +1,9 @@ +2008-01-15 Aidan Kehoe <kehoea@parhasard.net> + + * automated/lisp-tests.el (literal-with-uninterned): + Use ?\x syntax for Latin-1 characters, don't assume that the file + will be read as UTF-8. + 2008-01-15 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el (thing):
--- a/tests/automated/lisp-tests.el Tue Jan 15 21:35:41 2008 +0100 +++ b/tests/automated/lisp-tests.el Tue Jan 15 22:59:28 2008 +0100 @@ -1303,7 +1303,7 @@ (let* ((literal-with-uninterned '(first-element [#1=#:G32976 #2=#:G32974 #3=#:G32971 #4=#:G32969 alias - #s(hash-table size 256 data (969 ?ù 55 ?7 166 ?¦ )) + #s(hash-table size 256 data (969 ?\xF9 55 ?7 166 ?\xA6)) #5=#:G32970 #6=#:G32972])) (print-readably t) (print-gensym t)