From: Kenichi Handa <handa@m17n.org>
Date: Thu, 17 Jul 2008 01:27:01 +0000 (+0000)
Subject: (describe-char-unidata-list): Initialize to the
X-Git-Tag: emacs-pretest-23.0.90~4119
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=950b58594c0f86413bb23e3ea8f91a421cf9cefd;p=emacs.git

(describe-char-unidata-list): Initialize to the
list of name, general-category, decomposition, and old-name.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3a975feb1f6..8177c0a9814 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-07-17  Kenichi Handa  <handa@m17n.org>
+
+	* descr-text.el (describe-char-unidata-list): Initialize to the
+	list of name, general-category, decomposition, and old-name.
+
 2008-07-16  Adrian Robert  <Adrian.B.Robert@gmail.com>
 
 	* startup.el (command-line-1): Update processing of NS long options to
diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index 3d655d8d83a..e14e1edbebb 100644
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -179,7 +179,8 @@ otherwise."
 	(insert "There are text properties here:\n")
 	(describe-property-list properties)))))
 
-(defcustom describe-char-unidata-list nil
+(defcustom describe-char-unidata-list
+  '(name general-category decomposition old-name)
   "List of Unicode-based character property names shown by `describe-char'."
   :group 'mule
   :version "23.1"