martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(compute_glyph_face_1): New function.

Browse Source
This commit is contained in:
Richard M. Stallman
1994-08-07 04:51:57 +00:00
parent c462838494
commit 2e16580f12
1 changed files with 25 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
src/xfaces.c
View File

@@ -743,6 +743,31 @@ compute_glyph_face (f, face_code, current_face)
return intern_computed_face (f, &face);
}
/* Return the face ID to use to display a special glyph which selects
FACE_CODE as the face ID, assuming that ordinarily the face would
be CURRENT_FACE. F is the frame. */
int
compute_glyph_face_1 (f, face_name, current_face)
struct frame *f;
Lisp_Object face_name;
int current_face;
{
struct face face;
face = *FRAME_COMPUTED_FACES (f)[current_face];
if (!NILP (face_name))
{
int facecode = face_name_id_number (f, face_name);
if (facecode >= 0 && facecode < FRAME_N_PARAM_FACES (f)
&& FRAME_PARAM_FACES (f) [facecode] != 0)
merge_faces (FRAME_PARAM_FACES (f) [facecode], &face);
}
return intern_computed_face (f, &face);
}
/* Return the face ID associated with a buffer position POS.
Store into *ENDPTR the position at which a different face is needed.