comparison src/xfaces.c @ 25546:e98819a94512

Change `top-line' and `top_line' to `header-line' and `header_line'. Likewise for similar spellings.
author Gerd Moellmann <gerd@gnu.org>
date Sun, 05 Sep 1999 16:39:19 +0000
parents 693ca9ba497a
children c6be980d15a6
comparison
equal deleted inserted replaced
25545:b0a117037bde 25546:e98819a94512
279 Lisp_Object Qx_charset_registry; 279 Lisp_Object Qx_charset_registry;
280 280
281 /* Names of basic faces. */ 281 /* Names of basic faces. */
282 282
283 Lisp_Object Qdefault, Qmodeline, Qtool_bar, Qregion, Qmargin; 283 Lisp_Object Qdefault, Qmodeline, Qtool_bar, Qregion, Qmargin;
284 Lisp_Object Qtop_line; 284 Lisp_Object Qheader_line;
285 285
286 /* Default stipple pattern used on monochrome displays. This stipple 286 /* Default stipple pattern used on monochrome displays. This stipple
287 pattern is used on monochrome displays instead of shades of gray 287 pattern is used on monochrome displays instead of shades of gray
288 for a face background color. See `set-face-stipple' for possible 288 for a face background color. See `set-face-stipple' for possible
289 values for this variable. */ 289 values for this variable. */
5130 if (realize_default_face (f)) 5130 if (realize_default_face (f))
5131 { 5131 {
5132 realize_named_face (f, Qmodeline, MODE_LINE_FACE_ID); 5132 realize_named_face (f, Qmodeline, MODE_LINE_FACE_ID);
5133 realize_named_face (f, Qtool_bar, TOOL_BAR_FACE_ID); 5133 realize_named_face (f, Qtool_bar, TOOL_BAR_FACE_ID);
5134 realize_named_face (f, Qmargin, BITMAP_AREA_FACE_ID); 5134 realize_named_face (f, Qmargin, BITMAP_AREA_FACE_ID);
5135 realize_named_face (f, Qtop_line, TOP_LINE_FACE_ID); 5135 realize_named_face (f, Qheader_line, HEADER_LINE_FACE_ID);
5136 success_p = 1; 5136 success_p = 1;
5137 } 5137 }
5138 5138
5139 return success_p; 5139 return success_p;
5140 } 5140 }
5952 current_buffer, otherwise BUFPOS is zero to indicate that STRING is 5952 current_buffer, otherwise BUFPOS is zero to indicate that STRING is
5953 not an overlay string. W must display the current buffer. 5953 not an overlay string. W must display the current buffer.
5954 REGION_BEG and REGION_END give the start and end positions of the 5954 REGION_BEG and REGION_END give the start and end positions of the
5955 region; both are -1 if no region is visible. BASE_FACE_ID is the 5955 region; both are -1 if no region is visible. BASE_FACE_ID is the
5956 id of the basic face to merge with. It is usually equal to 5956 id of the basic face to merge with. It is usually equal to
5957 DEFAULT_FACE_ID but can be MODE_LINE_FACE_ID or TOP_LINE_FACE_ID 5957 DEFAULT_FACE_ID but can be MODE_LINE_FACE_ID or HEADER_LINE_FACE_ID
5958 for strings displayed in the mode or top line. 5958 for strings displayed in the mode or top line.
5959 5959
5960 Set *ENDPTR to the next position where to check for faces in 5960 Set *ENDPTR to the next position where to check for faces in
5961 STRING; -1 if the face is constant from POS to the end of the 5961 STRING; -1 if the face is constant from POS to the end of the
5962 string. 5962 string.
6246 staticpro (&Qtool_bar); 6246 staticpro (&Qtool_bar);
6247 Qregion = intern ("region"); 6247 Qregion = intern ("region");
6248 staticpro (&Qregion); 6248 staticpro (&Qregion);
6249 Qmargin = intern ("margin"); 6249 Qmargin = intern ("margin");
6250 staticpro (&Qmargin); 6250 staticpro (&Qmargin);
6251 Qtop_line = intern ("top-line"); 6251 Qheader_line = intern ("header-line");
6252 staticpro (&Qtop_line); 6252 staticpro (&Qheader_line);
6253 6253
6254 defsubr (&Sinternal_make_lisp_face); 6254 defsubr (&Sinternal_make_lisp_face);
6255 defsubr (&Sinternal_lisp_face_p); 6255 defsubr (&Sinternal_lisp_face_p);
6256 defsubr (&Sinternal_set_lisp_face_attribute); 6256 defsubr (&Sinternal_set_lisp_face_attribute);
6257 #ifdef HAVE_X_WINDOWS 6257 #ifdef HAVE_X_WINDOWS