emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 2001ae5: Revert back to using monospaced fonts in the mode line


From: Lars Ingebrigtsen
Subject: master 2001ae5: Revert back to using monospaced fonts in the mode line
Date: Thu, 23 Dec 2021 05:45:02 -0500 (EST)

branch: master
commit 2001ae5898a1e48cae5b138828190ac2cba39b40
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Revert back to using monospaced fonts in the mode line
    
    * lisp/faces.el (mode-line-active, mode-line-inactive): Revert
    back to using monospaced fonts on the mode line (for now).  The
    main remaining usability problem is clicking on the very small "-"
    characters in "U:--".
---
 etc/NEWS      | 9 ---------
 lisp/faces.el | 4 ++--
 2 files changed, 2 insertions(+), 11 deletions(-)

diff --git a/etc/NEWS b/etc/NEWS
index 948dbba..fb5ed74 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -91,15 +91,6 @@ time.
 ** 'C-x 8 .' has been moved to 'C-x 8 . .'.
 This is to open up the 'C-x 8 .' map to bind further characters there.
 
----
-** The mode line now uses a proportional font by default.
-To get the old monospaced mode line back, customize the
-'mode-line-active' and 'mode-line-inactive' faces not to inherit from
-the 'variable-pitch' face, or add this to your "~/.emacs":
-
-    (set-face-attribute 'mode-line-active nil :inherit 'mode-line)
-    (set-face-attribute 'mode-line-inactive nil :inherit 'mode-line)
-
 
 * Changes in Emacs 29.1
 
diff --git a/lisp/faces.el b/lisp/faces.el
index 9757987..39ba0f4 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2630,7 +2630,7 @@ See `mode-line-display' for the face used on mode lines."
   :group 'basic-faces)
 
 (defface mode-line-active
-  '((t :inherit (mode-line variable-pitch)))
+  '((t :inherit mode-line))
   "Face for the selected mode line.
 This inherits from the `mode-line' face."
   :version "29.1"
@@ -2639,7 +2639,7 @@ This inherits from the `mode-line' face."
 
 (defface mode-line-inactive
   '((default
-     :inherit (mode-line variable-pitch))
+     :inherit mode-line)
     (((class color) (min-colors 88) (background light))
      :weight light
      :box (:line-width -1 :color "grey75" :style nil)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]