Mercurial > emacs
comparison src/keyboard.c @ 16253:3ea02d461499
(make_lispy_event): When converting from pixel to glyph coordinates,
offset by WINDOW_LEFT_MARGIN; this is needed for left-side scrollbars.
(syms_of_keyboard): Initialize and staticpro
internal_last_event_frame and read_key_sequence_cmd.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 21 Sep 1996 01:11:31 +0000 |
parents | c7913b6ba8da |
children | bcc66c0b3bff |
comparison
equal
deleted
inserted
replaced
16252:41c962c84de5 | 16253:3ea02d461499 |
---|---|
3762 posn = Qnil; | 3762 posn = Qnil; |
3763 } | 3763 } |
3764 else | 3764 else |
3765 { | 3765 { |
3766 int pixcolumn, pixrow; | 3766 int pixcolumn, pixrow; |
3767 column -= XINT (XWINDOW (window)->left); | 3767 column -= WINDOW_LEFT_MARGIN (XWINDOW (window)); |
3768 row -= XINT (XWINDOW (window)->top); | 3768 row -= XINT (XWINDOW (window)->top); |
3769 glyph_to_pixel_coords (f, column, row, &pixcolumn, &pixrow); | 3769 glyph_to_pixel_coords (f, column, row, &pixcolumn, &pixrow); |
3770 XSETINT (event->x, pixcolumn); | 3770 XSETINT (event->x, pixcolumn); |
3771 XSETINT (event->y, pixrow); | 3771 XSETINT (event->y, pixrow); |
3772 | 3772 |
4025 window = Qnil; | 4025 window = Qnil; |
4026 | 4026 |
4027 if (WINDOWP (window)) | 4027 if (WINDOWP (window)) |
4028 { | 4028 { |
4029 int pixcolumn, pixrow; | 4029 int pixcolumn, pixrow; |
4030 column -= XINT (XWINDOW (window)->left); | 4030 column -= WINDOW_LEFT_MARGIN (XWINDOW (window)); |
4031 row -= XINT (XWINDOW (window)->top); | 4031 row -= XINT (XWINDOW (window)->top); |
4032 glyph_to_pixel_coords (frame, column, row, &pixcolumn, &pixrow); | 4032 glyph_to_pixel_coords (frame, column, row, &pixcolumn, &pixrow); |
4033 XSETINT (x, pixcolumn); | 4033 XSETINT (x, pixcolumn); |
4034 XSETINT (y, pixrow); | 4034 XSETINT (y, pixrow); |
4035 | 4035 |