4997 |
|
|
4998 |
if (! face) |
if (! face) |
4999 |
return Qnil; |
return Qnil; |
5000 |
if (NILP (character)) |
#ifdef HAVE_WINDOW_SYSTEM |
5001 |
return build_string (face->font_name); |
if (!NILP (character)) |
5002 |
CHECK_CHARACTER (character); |
{ |
5003 |
face_id = FACE_FOR_CHAR (f, face, XINT (character), -1, Qnil); |
CHECK_CHARACTER (character); |
5004 |
face = FACE_FROM_ID (f, face_id); |
face_id = FACE_FOR_CHAR (f, face, XINT (character), -1, Qnil); |
5005 |
return (face->font && face->font_name |
face = FACE_FROM_ID (f, face_id); |
5006 |
? build_string (face->font_name) |
return (face->font && face->font_name |
5007 |
: Qnil); |
? build_string (face->font_name) |
5008 |
|
: Qnil); |
5009 |
|
} |
5010 |
|
#endif |
5011 |
|
return build_string (face->font_name); |
5012 |
} |
} |
5013 |
} |
} |
5014 |
|
|