(cp874, ibm874): New coding systems.

diff --git a/lisp/language/thai.el b/lisp/language/thai.el
index b511bfd946f7344cd06849cf06387f4745c409ab..0a46aad81c954897eb832b0cefa6126a3591f423 100644 (file)
--- a/lisp/language/thai.el
+++ b/lisp/language/thai.el
@@ -59,6 +59,14 @@
                      '(("\\c0\\c4\\|\\c0\\(\\c2\\|\\c3\\)\\c4?"
                         . thai-composition-function)))
 
+(define-coding-system 'cp874
+  "DOS codepage 874 (Thai)"
+  :coding-type 'charset
+  :mnemonic ?D
+  :charset-list '(cp874)
+  :mime-charset 'cp874)
+(define-coding-system-alias 'ibm874 'cp874)
+
 (provide 'thai)
 
 ;;; thai.el ends here