mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 00:01:33 -08:00
Code Issues Projects Releases Wiki Activity

; face-font-family-alternatives, fixed-pitch: Comments.

Browse source
This commit is contained in:
Sean Whitton 2025-07-25 09:05:24 +01:00
parent dd29b0ab66
commit 47deb38f21
1 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/faces.el
View file

@ -95,9 +95,10 @@ a font height that isn't optimal."
(internal-set-font-selection-order value)))
;; In the absence of Fontconfig support, Monospace and Sans Serif are
;; unavailable, and we fall back on the courier and helv families,
;; which are generally available.
;; We use Fontconfig if we have it. This list is an alternative
;; mechanism to fall back to in the absence of Fontconfig.
;; In that situation, Monospace and Sans Serif are unavailable, and we
;; turn to the courier and helv families, which are generally available.
(defcustom face-font-family-alternatives
(mapcar (lambda (arg) (mapcar 'purecopy arg))
'(("Monospace" "courier" "fixed")
@ -2468,6 +2469,10 @@ If you set `term-file-prefix' to nil, this function does nothing."
"Basic underlined face."
:group 'basic-faces)
;; Ideally, in Emacs's default look, we'd like the default and
;; fixed-pitch faces to use two different monospace typefaces so that
;; they're visually distinct. At present, that's achieved on MS-Windows
;; and macOS, but not on platforms that use Fontconfig. See bug#79083.
(defface fixed-pitch
'((t :family "Monospace"))
"The basic fixed-pitch face."