From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 15 Aug 2019 03:22:36 +0000 (-0700)
Subject: Arrange custom-face-attributes closer to how heavy they are
X-Git-Tag: emacs-27.0.90~1621
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a5e7c6c617bb4d33e5fbd19b81db90f039fd3060;p=emacs.git

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 0ee6a8dcc8f..d73bce42c3e 100644
--- 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"