Mercurial > emacs
comparison src/xterm.c @ 24941:1edc68c613d8
(x_display_bar_cursor): Use the cursor-color
to display the bar, not the cursor foreground pixel.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 10 Jul 1999 20:45:46 +0000 |
| parents | 585a5e69e371 |
| children | 53d428012caf |
comparison
equal
deleted
inserted
replaced
| 24940:ca83292ec6f2 | 24941:1edc68c613d8 |
|---|---|
| 4826 f->phys_cursor_glyph | 4826 f->phys_cursor_glyph |
| 4827 = ((current_glyphs->enable[y] | 4827 = ((current_glyphs->enable[y] |
| 4828 && x < current_glyphs->used[y]) | 4828 && x < current_glyphs->used[y]) |
| 4829 ? current_glyphs->glyphs[y][x] | 4829 ? current_glyphs->glyphs[y][x] |
| 4830 : SPACEGLYPH); | 4830 : SPACEGLYPH); |
| 4831 | |
| 4832 { | |
| 4833 XGCValues xgcv; | |
| 4834 unsigned long mask; | |
| 4835 | |
| 4836 xgcv.background = f->output_data.x->cursor_pixel; | |
| 4837 xgcv.foreground = f->output_data.x->cursor_pixel; | |
| 4838 xgcv.graphics_exposures = 0; | |
| 4839 mask = GCForeground | GCBackground | GCGraphicsExposures; | |
| 4840 | |
| 4841 if (FRAME_X_DISPLAY_INFO (f)->scratch_cursor_gc) | |
| 4842 XChangeGC (FRAME_X_DISPLAY (f), | |
| 4843 FRAME_X_DISPLAY_INFO (f)->scratch_cursor_gc, | |
| 4844 mask, &xgcv); | |
| 4845 else | |
| 4846 FRAME_X_DISPLAY_INFO (f)->scratch_cursor_gc | |
| 4847 = XCreateGC (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), mask, &xgcv); | |
| 4848 } | |
| 4849 | |
| 4831 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), | 4850 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), |
| 4832 f->output_data.x->cursor_gc, | 4851 FRAME_X_DISPLAY_INFO (f)->scratch_cursor_gc, |
| 4833 CHAR_TO_PIXEL_COL (f, x), | 4852 CHAR_TO_PIXEL_COL (f, x), |
| 4834 CHAR_TO_PIXEL_ROW (f, y), | 4853 CHAR_TO_PIXEL_ROW (f, y), |
| 4835 max (f->output_data.x->cursor_width, 1), | 4854 max (f->output_data.x->cursor_width, 1), |
| 4836 f->output_data.x->line_height); | 4855 f->output_data.x->line_height); |
| 4837 | 4856 |