# HG changeset patch # User Aidan Kehoe # Date 1200434368 -3600 # Node ID e97f16fb2e2584470e54cd36c7f17eaff95c06a4 # Parent b03b5e362fcff61ac4632834ea16615407c1264b Don't assume lisp-tests.el will be correctly read as UTF-8. 2008-01-15 Aidan Kehoe * 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. diff -r b03b5e362fcf -r e97f16fb2e25 tests/ChangeLog --- 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 + + * 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 * automated/lisp-tests.el (thing): diff -r b03b5e362fcf -r e97f16fb2e25 tests/automated/lisp-tests.el --- 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)