APPROVE COMMIT NOTE: This patch has been committed # HG changeset patch # User Aidan Kehoe <kehoea(a)parhasard.net&gt; # Date 1506765697 -3600 # Sat Sep 30 11:01:37 2017 +0100 # Node ID 553b0328db22a9e8d8aa6159493a344cd730d72a # Parent 76f43a5976366dda6eccf404c05780778ba1f0f7 Drop thai-iso8859-11, it is identical to thai-tis620 and confuses tests. 2017-09-30 Aidan Kehoe <kehoea(a)parhasard.net&gt; * mule/thai.el: * mule/thai.el (thai-tis620): * mule/thai.el (tis-620): The charset thai-iso8859-11 is identical to thai-tis620 for our purposes, and its presence makes the digit-char test code fail on non-mule. Remove it. Use tis-620, the preferred IANA name for related coding system, as the related coding system name. Provide iso-8859-11, not actually an IANA name, as an alias. diff -r 76f43a597636 -r 553b0328db22 lisp/ChangeLog --- a/lisp/ChangeLog Thu Sep 28 13:47:26 2017 +0900 +++ b/lisp/ChangeLog Sat Sep 30 11:01:37 2017 +0100 ＠＠ -1,3 +1,14 ＠＠ +2017-09-30 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * mule/thai.el: + * mule/thai.el (thai-tis620): + * mule/thai.el (tis-620): + The charset thai-iso8859-11 is identical to thai-tis620 for our + purposes, and its presence makes the digit-char test code fail on + non-mule. Remove it. Use tis-620, the preferred IANA name for + related coding system, as the related coding system name. Provide + iso-8859-11, not actually an IANA name, as an alias. + 2017-09-25 Aidan Kehoe <kehoea(a)parhasard.net&gt; * subr.el (concat): diff -r 76f43a597636 -r 553b0328db22 lisp/mule/thai.el --- a/lisp/mule/thai.el Thu Sep 28 13:47:26 2017 +0900 +++ b/lisp/mule/thai.el Sat Sep 30 11:01:37 2017 +0100 ＠＠ -27,29 +27,17 ＠＠ ;;; Code: -(make-charset - 'thai-iso8859-11 - "Right-Hand Part of Latin/Thai Alphabet (ISO/IEC 8859-11)" - '(dimension 1 - registries ["ISO8859-11"] - chars 96 - ;final ?T ＠＠#### What is the final byte for this? - graphic 1 - unicode-map ("unicode/unicode-consortium/ISO8859/8859-11.TXT" #xA0) - short-name "Thai (ISO8859-11)" - long-name "RHP of Thai (ISO 8859-11)" - tags (iso8859 thai))) +;; XEmacs; drop the thai-iso8859-11 charset, which is identical to thai-tis620 +;; for our purposes, and confuses the digit-char checks in the test suite on +;; non-unicode-internal. (make-coding-system - 'thai-tis620 'multibyte "Thai/TIS620" + 'tis-620 'multibyte "Thai/TIS620" '(charsets (ascii thai-tis620) mnemonic "Thai" post-read-conversion thai-post-read-conversion - documentation "8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)")) - -(define-coding-system-alias 'th-tis620 'thai-tis620) -(define-coding-system-alias 'tis620 'thai-tis620) -(define-coding-system-alias 'tis-620 'thai-tis620) + documentation "8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)" + aliases (iso-8859-11 thai-tis620 th-tis620 tis620))) (set-language-info-alist "Thai" '((tutorial . "TUTORIAL.th") -- ‘As I sat looking up at the Guinness ad, I could never figure out / How your man stayed up on the surfboard after forty pints of stout’ (C. Moore)