Arrange custom-face-attributes closer to how heavy they are

* lisp/cus-face.el (custom-face-attributes): Arrange the weights
more in order of how heavy they are (bug#15526).

diff --git a/lisp/cus-face.el b/lisp/cus-face.el
index 0ee6a8dcc8fc856dc40a3aef1b2de556e77096f1..d73bce42c3ef0d40c5e2bae2b4ef6b8860532981 100644 (file)
--- a/lisp/cus-face.el
+++ b/lisp/cus-face.el
@@ -84,22 +84,22 @@
      (choice :tag "Weight"
             :help-echo "Font weight."
             :value normal              ; default
-            (const :tag "black" ultra-bold)
-            (const :tag "bold" bold)
-            (const :tag "book" semi-light)
-            (const :tag "demibold" semi-bold)
+            (const :tag "ultralight" ultra-light)
             (const :tag "extralight" extra-light)
-            (const :tag "extrabold" extra-bold)
-            (const :tag "heavy" extra-bold)
             (const :tag "light" light)
-            (const :tag "medium" normal)
+            (const :tag "thin" thin)
+            (const :tag "semilight" semi-light)
+            (const :tag "book" semi-light)
             (const :tag "normal" normal)
             (const :tag "regular" normal)
+            (const :tag "medium" normal)
             (const :tag "semibold" semi-bold)
-            (const :tag "semilight" semi-light)
-            (const :tag "ultralight" ultra-light)
+            (const :tag "demibold" semi-bold)
+            (const :tag "bold" bold)
+            (const :tag "extrabold" extra-bold)
+            (const :tag "heavy" extra-bold)
             (const :tag "ultrabold" ultra-bold)
-            (const :tag "thin" thin)))
+            (const :tag "black" ultra-bold)))
 
     (:slant
      (choice :tag "Slant"