# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1227386607 0
# Node ID a5a1e57fb6670ad29036d3ef521d064aadaeec93
# Parent  e3d342053d7580e2d82cf2c42dffe100d6742001
(describe-char-unidata-list): Move `old-name' to be immediately after `name'.

diff -r e3d342053d75 -r a5a1e57fb667 lisp/descr-text.el
--- a/lisp/descr-text.el	Sat Nov 22 20:42:18 2008 +0000
+++ b/lisp/descr-text.el	Sat Nov 22 20:43:27 2008 +0000
@@ -180,13 +180,14 @@
 	(describe-property-list properties)))))
 
 (defcustom describe-char-unidata-list
-  '(name general-category decomposition old-name)
+  '(name old-name general-category decomposition)
   "List of Unicode-based character property names shown by `describe-char'."
   :group 'mule
   :version "23.1"
   :type '(choice (const :tag "All properties" t)
           (set
            (const :tag "Unicode Name" name)
+           (const :tag "Unicode old name" old-name)
            (const :tag "Unicode general category " general-category)
            (const :tag "Unicode canonical combining class"
                   canonical-combining-class)
@@ -196,7 +197,6 @@
            (const :tag "Unicode digit value" digit-value)
            (const :tag "Unicode numeric value" numeric-value)
            (const :tag "Unicode mirrored" mirrored)
-           (const :tag "Unicode old name" old-name)
            (const :tag "Unicode ISO 10646 comment" iso-10646-comment)
            (const :tag "Unicode simple uppercase mapping" uppercase)
            (const :tag "Unicode simple lowercase mapping" lowercase)