Mercurial > emacs
changeset 34384:9669bb49fca2
(Fmove_to_window_line): Skip past any partially visible first line.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Fri, 08 Dec 2000 18:56:35 +0000 |
| parents | 87e249cf993b |
| children | 59e724d55566 |
| files | src/window.c |
| diffstat | 1 files changed, 5 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/window.c Fri Dec 08 18:14:23 2000 +0000 +++ b/src/window.c Fri Dec 08 18:56:35 2000 +0000 @@ -4482,12 +4482,7 @@ int lines = (rest + CANON_Y_UNIT (f) - 1) / CANON_Y_UNIT (f); it.vpos += lines; } -#if 0 - else if (it.current_y < height && bottom_y > height) - /* Partially visible line at the bottom. */ - ++it.vpos; -#endif - + return it.vpos; } @@ -4529,6 +4524,10 @@ XSETINT (arg, XINT (arg) + lines); } + if (w->vscroll) + /* Skip past a partially visible first line. */ + XSETINT (arg, XINT (arg) + 1); + return Fvertical_motion (arg, window); }