comparison lisp/international/mule-cmds.el @ 90007:cf86a2612bff

(locale-language-names): Fix for gb18030 and gdk.

90006:7040d5c05784

		   (string= "The XFree86 Project, Inc" (x-server-vendor))
		   (> (aref (number-to-string (nth 2 (x-server-version))) 0)
		      ?3))
	  ;; We suppress these setting for the moment because the
	  ;; above assumption is wrong.
	  ;; (aset standard-display-table ?' [?’])
	  ;; (aset standard-display-table ?` [?‘])
	  ;; The fonts don't have the relevant bug.
	  (aset standard-display-table 160 nil)
	  (aset standard-display-table (make-char 'latin-iso8859-1 160)
		nil)))))

    ; glibc:
    ; zh_HK/BIG5-HKSCS \

    ("zh.*[._]big5" . "Chinese-BIG5")
    ("zh.*[._].gb18030" . "Chinese-GB18030") ; zh_CN.GB18030/GB18030 in glibc
    ("zh.*[._].gbk" . "Chinese-GBK")
    ;; glibc has zh_TW.EUC-TW, with zh_TW defaulting to Big5
    ("zh_tw" . "Chinese-CNS") ; glibc uses big5
    ("zh_tw[._]euc-tw" . "Chinese-EUC-TW")
    ("zh" . "Chinese-GB")
    ; zu Zulu

90007:cf86a2612bff

		   (string= "The XFree86 Project, Inc" (x-server-vendor))
		   (> (aref (number-to-string (nth 2 (x-server-version))) 0)
		      ?3))
	  ;; We suppress these setting for the moment because the
	  ;; above assumption is wrong.
	  ;; (aset standard-display-table ?' [?,F"])
	  ;; (aset standard-display-table ?` [?,F!])
	  ;; The fonts don't have the relevant bug.
	  (aset standard-display-table 160 nil)
	  (aset standard-display-table (make-char 'latin-iso8859-1 160)
		nil)))))

    ; glibc:
    ; zh_HK/BIG5-HKSCS \

    ("zh.*[._]big5" . "Chinese-BIG5")
    ("zh.*[._]gb18030" . "Chinese-GB18030") ; zh_CN.GB18030/GB18030 in glibc
    ("zh.*[._]gbk" . "Chinese-GBK")
    ;; glibc has zh_TW.EUC-TW, with zh_TW defaulting to Big5
    ("zh_tw" . "Chinese-CNS") ; glibc uses big5
    ("zh_tw[._]euc-tw" . "Chinese-EUC-TW")
    ("zh" . "Chinese-GB")
    ; zu Zulu