# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1033102258 0
# Node ID 81d88ca705db2bcf56dcc51d0c7c8ef96aab484f
# Parent  aabfe2dc76daa7e06e8b7bbffc22b442824f6900
(set_lface_from_font_name): Reject the default fontset.
(Finternal_set_lisp_face_attribute): Use signal_error for the
error of invalid fontset.

diff -r aabfe2dc76da -r 81d88ca705db src/xfaces.c
--- a/src/xfaces.c	Fri Sep 27 04:50:23 2002 +0000
+++ b/src/xfaces.c	Fri Sep 27 04:50:58 2002 +0000
@@ -3220,8 +3220,14 @@
 
   /* If FONTNAME is actually a fontset name, get ASCII font name of it.  */
   fontset = fs_query_fontset (fontname, 0);
-  if (fontset >= 0)
+  if (fontset > 0)
     font_name = XSTRING (fontset_ascii (fontset))->data;
+  else if (fontset == 0)
+    {
+      if (may_fail_p)
+	return 0;
+      abort ();
+    }
 
   /* Check if FONT_NAME is surely available on the system.  Usually
      FONT_NAME is already cached for the frame F and FS_LOAD_FONT
@@ -4156,7 +4162,7 @@
 	  if (!NILP (tmp))
 	    value = tmp;
 	  else if (EQ (attr, QCfontset))
-	    error ("Invalid fontset", XSTRING (value)->data);
+	    signal_error ("Invalid fontset name", value);
 
 	  if (EQ (attr, QCfont))
 	    {