changeset 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 6fab7c7bb1f1
files lisp/faces.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
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))))))