diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-08-31 22:03:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-08-31 22:03:30 +0000 |
| commit | abd89b803137814128d5ca2da52bf0f9e71ccfcc (patch) | |
| tree | 9b07e10c99b10234d23fcbfa513132395f9e71c1 /lisp/faces.el | |
| parent | fa9e8864b4bfe8d00db52634893ebef0c2cd2d80 (diff) | |
| download | emacs-abd89b803137814128d5ca2da52bf0f9e71ccfcc.tar.gz | |
(internal-set-face-1): When calling x-list-fonts, ask for just one match.
Diffstat (limited to 'lisp/faces.el')
| -rw-r--r-- | lisp/faces.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 8c199fcfb70..02de29f02b4 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -675,7 +675,7 @@ also the same size as FACE on FRAME, or fail." (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) |