# HG changeset patch
# User Kenichi Handa  <handa@m17n.org>
# Date 1268047858 -32400
# Node ID 7199654c719e610369761c29b6a8a3695aa087ae
# Parent  1cbedcbd728ff662139dfc6d131c53e958f73d1f# Parent  2c10bcb56f5b75cef7b4fe1050363ef82f615022
Add coding system windows-1256 (alias cp1256).

diff -r 1cbedcbd728f -r 7199654c719e lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Mar 07 18:34:40 2010 +0100
+++ b/lisp/ChangeLog	Mon Mar 08 20:30:58 2010 +0900
@@ -1,3 +1,8 @@
+2010-03-08  Kenichi Handa  <handa@m17n.org>
+
+	* language/misc-lang.el (windows-1256): New coding system.
+	(cp1256): New alias of windows-1256 (bug#5684).
+
 2010-03-07  Andreas Schwab  <schwab@linux-m68k.org>
 
 	* mail/rfc822.el (rfc822-addresses): Move catch clause down around
diff -r 1cbedcbd728f -r 7199654c719e lisp/language/misc-lang.el
--- a/lisp/language/misc-lang.el	Sun Mar 07 18:34:40 2010 +0100
+++ b/lisp/language/misc-lang.el	Mon Mar 08 20:30:58 2010 +0900
@@ -50,6 +50,14 @@
   :charset-list '(iso-8859-6)
   :mime-charset 'iso-8859-6)
 
+(define-coding-system 'windows-1256
+  "windows-1256 (Arabic) encoding (MIME: WINDOWS-1256)"
+  :coding-type 'charset
+  :mnemonic ?A
+  :charset-list '(windows-1256)
+  :mime-charset 'windows-1256)
+(define-coding-system-alias 'cp1256 'windows-1256)
+
 (provide 'misc-lang)
 
 ;; arch-tag: 6953585c-1a1a-4c09-be82-a2518afb6074