Mercurial > emacs
diff lisp/faces.el @ 3298:0b96c67ca1c5
* faces.el (x-resolve-font-name): Give correct error message
depending on whether or not FACE was non-nil.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Sun, 30 May 1993 17:28:33 +0000 |
| parents | 3421b4474f83 |
| children | 8cbd38886eef |
line wrap: on
line diff
--- a/lisp/faces.el Sun May 30 17:21:36 1993 +0000 +++ b/lisp/faces.el Sun May 30 17:28:33 1993 +0000 @@ -428,9 +428,9 @@ (let ((fonts (x-list-fonts pattern face frame))) (or fonts (if face - (error "no fonts match `%S'." pattern) - (error "no fonts matching pattern are the same size as `%s'." - face))) + (error "no fonts matching pattern are the same size as `%s'." + face) + (error "no fonts match `%S'." pattern))) (car fonts)) (cdr (assq 'font (frame-parameters (selected-frame))))))