Commit cccd42d5 authored by Kenichi Handa's avatar Kenichi Handa

(Ffont_spec): Check arguments.

parent 337fbd17
2009-05-15 Kenichi Handa <handa@m17n.org>
* font.c (Ffont_spec): Check arguments.
2009-05-14 Chong Yidong <cyd@stupidchicken.com>
* xfaces.c (tty_supports_face_attributes_p): Recognize unspecified
......
......@@ -4007,7 +4007,12 @@ usage: (font-spec ARGS...) */)
for (i = 0; i < nargs; i += 2)
{
Lisp_Object key = args[i], val = args[i + 1];
Lisp_Object key = args[i], val;
CHECK_SYMBOL (key);
if (i + 1 >= nargs)
error ("No value for key `%s'", SDATA (SYMBOL_NAME (key)));
val = args[i + 1];
if (EQ (key, QCname))
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment