(internal-set-face-1): When calling x-list-fonts, ask for just one match.
Showing with 1 addition and 1 deletion
|...||...||@@ -675,7 +675,7 @@ also the same size as FACE on FRAME, or fail."|
|(setq frame nil))|
|;; Note that x-list-fonts has code to handle a face with nil as its font.|
|(let ((fonts (x-list-fonts pattern face frame)))|
|(let ((fonts (x-list-fonts pattern face frame 1)))|
|(if (string-match "\\*" pattern)|