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 |