(fontset_from_font, Ffontset_info): Add the 2nd arg in

call of Ffont_xlfd_name.

diff --git a/src/fontset.c b/src/fontset.c
index 92c9f2a2268b3604ee87a272ea5a2f32bf3b00dd..e2fafbb932f6d8d62bac64aef000312491618489 100644 (file)
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -1602,7 +1602,7 @@ fontset_from_font (font_object)
     }
   fontset_spec = Fcopy_font_spec (font_spec);
   ASET (fontset_spec, FONT_REGISTRY_INDEX, alias);
-  name = Ffont_xlfd_name (fontset_spec);
+  name = Ffont_xlfd_name (fontset_spec, Qnil);
   if (NILP (name))
     abort ();
   fontset = make_fontset (Qnil, name, Qnil);
@@ -1905,7 +1905,7 @@ fontset.  The format is the same as above.  */)
              for (; CONSP (alist); alist = XCDR (alist))
                {
                  elt = XCAR (alist);
-                 XSETCAR (elt, Ffont_xlfd_name (XCAR (elt)));
+                 XSETCAR (elt, Ffont_xlfd_name (XCAR (elt), Qnil));
                }
            }
          c = to + 1;