mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(x_draw_bar_cursor): New argument KIND; callers changed.

Browse Source 
Handle the `hbar' cursor type.
(x_display_and_set_cursor): Handle the HBAR_CURSOR case.
This commit is contained in:
Jason Rumney 2002-05-22 19:37:56 +00:00
parent 6a6ab7b654
commit 17456df15c
2 changed files with 38 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/ChangeLog
View File

@ -1,3 +1,19 @@
2002-05-22 Jason Rumney <jasonr@gnu.org>
* w32fns.c (enumfont_t): Remove tail, make pattern a normal
Lisp_Object.
(enum_font_cb2, enum_font_maybe_add_to_list, w32_list_fonts):
Use modified enumfont_t struct.
* w32term.h (text_cursor_kinds): New enumeration member HBAR_CURSOR.
* w32term.c (x_draw_bar_cursor): New argument KIND; callers changed.
Handle the `hbar' cursor type.
(x_display_and_set_cursor): Handle the HBAR_CURSOR case.
* w32fns.c (Qhbar): New variable.
(x_specified_cursor_type): Use it.
2002-05-21 Ken Raeburn <raeburn@gnu.org>
* w32fns.c (enum_font_maybe_add_to_list): Use XCDR_AS_LVALUE for

28
src/w32term.c
View File

@ -9455,10 +9455,11 @@ x_draw_hollow_cursor (w, row)
--gerd. */
static void
x_draw_bar_cursor (w, row, width)
x_draw_bar_cursor (w, row, width, kind)
struct window *w;
struct glyph_row *row;
int width;
enum text_cursor_kinds kind;
{
struct frame *f = XFRAME (w->frame);
struct glyph *cursor_glyph;
@ -9488,6 +9489,7 @@ x_draw_bar_cursor (w, row, width)
if (width < 0)
width = f->output_data.w32->cursor_width;
width = min (cursor_glyph->pixel_width, width);
/* If the glyph's background equals the color we normally draw
the bar cursor in, the bar cursor in its normal color is
@ -9500,10 +9502,20 @@ x_draw_bar_cursor (w, row, width)
x = WINDOW_TEXT_TO_FRAME_PIXEL_X (w, w->phys_cursor.x);
hdc = get_frame_dc (f);
w32_clip_to_row (w, row, hdc, 0);
w32_fill_area (f, hdc, cursor_color, x,
WINDOW_TO_FRAME_PIXEL_Y (w, w->phys_cursor.y),
min (cursor_glyph->pixel_width, width),
row->height);
if (kind == BAR_CURSOR)
{
w32_fill_area (f, hdc, cursor_color, x,
WINDOW_TO_FRAME_PIXEL_Y (w, w->phys_cursor.y),
width, row->height);
}
else
{
w32_fill_area (f, hdc, cursor_color, x,
WINDOW_TO_FRAME_PIXEL_Y (w, w->phys_cursor.y +
row->height - width),
cursor_glyph->pixel_width, width);
}
release_frame_dc (f, hdc);
}
}
@ -9872,7 +9884,11 @@ x_display_and_set_cursor (w, on, hpos, vpos, x, y)
break;
case BAR_CURSOR:
x_draw_bar_cursor (w, glyph_row, new_cursor_width);
x_draw_bar_cursor (w, glyph_row, new_cursor_width, BAR_CURSOR);
break;
case HBAR_CURSOR:
x_draw_bar_cursor (w, glyph_row, new_cursor_width, HBAR_CURSOR);
break;
case NO_CURSOR: