# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1041885548 0
# Node ID f43c7c8adcdf750dcbac3cb8499a4aae8142f1ed
# Parent  a45ef2c4e7f405c7b0f349a90df6cf9420cdafcf
("Chinese-EUC-TW"): New.

diff -r a45ef2c4e7f4 -r f43c7c8adcdf lisp/language/chinese.el
--- a/lisp/language/chinese.el	Mon Jan 06 17:42:52 2003 +0000
+++ b/lisp/language/chinese.el	Mon Jan 06 20:39:08 2003 +0000
@@ -321,10 +321,26 @@
 		 (features china-util)
 		 (input-method . "chinese-cns-quick")
 		 (documentation . "\
-Support for Chinese CNS character sets.  Note that EUC-TW coding system
+Support for Chinese CNS character sets.  Note that the EUC-TW coding system
 accepts Big5 for input also (which is then converted to CNS)."))
  '("Chinese"))
 
+(set-language-info-alist
+ "Chinese-EUC-TW" '((charset chinese-cns11643-1 chinese-cns11643-2
+			     chinese-cns11643-3 chinese-cns11643-4
+			     chinese-cns11643-5 chinese-cns11643-6
+			     chinese-cns11643-7 chinese-big5-1 chinese-big5-2)
+		    (coding-system euc-tw iso-2022-cn)
+		    (coding-priority euc-tw chinese-big5 iso-2022-cn
+				     chinese-iso-8bit)
+		    (features china-util)
+		    (input-method . "chinese-cns-quick")
+		    (documentation . "\
+Support for Chinese, prefering the EUC-TW character set.  Note that
+the EUC-TW coding system accepts Big5 for input also (which is then
+converted to CNS)."))
+ '("Chinese"))
+
 (provide 'chinese)
 
 ;;; chinese.el ends here