(ftfont_get_open_type_spec): Check spec->script, not val.

This commit is contained in:
Jason Rumney 2008-04-03 08:17:15 +00:00
parent a086d081fa
commit 43f4f91cef
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2008-04-03 Jason Rumney <jasonr@gnu.org>
* ftfont.c (ftfont_get_open_type_spec): Check spec->script, not val.
2008-04-02 Chong Yidong <cyd@stupidchicken.com>
* callint.c (Vshift_select_mode): New var.

View file

@ -355,7 +355,7 @@ ftfont_get_open_type_spec (Lisp_Object otf_spec)
if (! spec)
return NULL;
spec->script = XCAR (otf_spec);
if (! NILP (val))
if (! NILP (spec->script))
{
OTF_SYM_TAG (spec->script, spec->script_tag);
val = assq_no_quit (spec->script, Votf_script_alist);