From: Kenichi Handa <handa@m17n.org>
Date: Thu, 5 Jun 2008 05:39:37 +0000 (+0000)
Subject: (Ffont_put): Don't use font_parse_family_registry for
X-Git-Tag: emacs-pretest-23.0.90~5089
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=69eb9e8b477b8693803bc7b18f212448c5457e78;p=emacs.git

(Ffont_put): Don't use font_parse_family_registry for
family name.
---

diff --git a/src/font.c b/src/font.c
index 2f65f3d0832..3c28f8e10e9 100644
--- a/src/font.c
+++ b/src/font.c
@@ -3534,13 +3534,7 @@ DEFUN ("font-put", Ffont_put, Sfont_put, 3, 3, 0,
   CHECK_FONT_SPEC (font_spec);
   idx = get_font_prop_index (prop);
   if (idx >= 0 && idx < FONT_EXTRA_INDEX)
-    {
-      if (idx == FONT_FAMILY_INDEX
-	  && STRINGP (val))
-	font_parse_family_registry (val, Qnil, font_spec);
-      else
-	ASET (font_spec, idx, font_prop_validate (idx, Qnil, val));
-    }
+    ASET (font_spec, idx, font_prop_validate (idx, Qnil, val));
   else
     font_put_extra (font_spec, prop, font_prop_validate (0, prop, val));
   return val;