Mercurial > emacs
changeset 16002:c8cbde1d3f11
(internal-set-face-1): When calling x-list-fonts, ask for just one match.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 31 Aug 1996 22:03:30 +0000 |
parents | 36d2c4a8e064 |
children | 96349e2b7511 |
files | lisp/faces.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Sat Aug 31 21:53:53 1996 +0000 +++ b/lisp/faces.el Sat Aug 31 22:03:30 1996 +0000 @@ -675,7 +675,7 @@ (setq frame nil)) (if pattern ;; 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))) (or fonts (if face (if (string-match "\\*" pattern)