]> git.eshelyaron.com Git - emacs.git/commitdiff
(xfont_parse_name): Delete this function.
authorKenichi Handa <handa@m17n.org>
Fri, 16 Jun 2006 12:13:36 +0000 (12:13 +0000)
committerKenichi Handa <handa@m17n.org>
Fri, 16 Jun 2006 12:13:36 +0000 (12:13 +0000)
src/xfont.c

index a32f84b756f3f026169b40a1b14c36ac38436778..de27f996a5f0531f6f039eb63ded05008164013a 100644 (file)
@@ -238,7 +238,6 @@ xfont_registry_charsets (registry, encoding, repertory)
 }
 
 static Lisp_Object xfont_get_cache P_ ((Lisp_Object));
-static int xfont_parse_name P_ ((FRAME_PTR, char *, Lisp_Object));
 static Lisp_Object xfont_list P_ ((Lisp_Object, Lisp_Object));
 static Lisp_Object xfont_list_family P_ ((Lisp_Object));
 static struct font *xfont_open P_ ((FRAME_PTR, Lisp_Object, int));
@@ -257,7 +256,6 @@ struct font_driver xfont_driver =
   {
     (Lisp_Object) NULL,                /* Qx */
     xfont_get_cache,
-    xfont_parse_name,
     xfont_list,
     xfont_list_family,
     NULL,
@@ -282,23 +280,6 @@ xfont_get_cache (frame)
   return (dpyinfo->name_list_element);
 }
 
-static int
-xfont_parse_name (f, name, spec)
-     FRAME_PTR f;
-     char *name;
-     Lisp_Object spec;
-{
-  if (font_parse_xlfd (name, spec, 0) >= 0)
-    return 0;
-  name = xfont_query_font (FRAME_X_DISPLAY (f), name, spec);
-  if (name)
-    {
-      XFree (name);
-      return 0;
-    }
-  return -1;
-}
-
 extern Lisp_Object Vface_alternative_font_registry_alist;
 
 static Lisp_Object