Mercurial > emacs
changeset 20876:c80b908e5af5
(compute_motion): If right margin is reached and we are
truncating don't clobber PREV_HPOS if we are already past TO.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Mon, 09 Feb 1998 11:16:35 +0000 |
parents | 4fac9830041a |
children | 4b22b9a5bd8e |
files | src/indent.c |
diffstat | 1 files changed, 11 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/src/indent.c Mon Feb 09 00:21:15 1998 +0000 +++ b/src/indent.c Mon Feb 09 11:16:35 1998 +0000 @@ -1165,20 +1165,21 @@ && width + 1 < FRAME_WIDTH (XFRAME (WINDOW_FRAME (win)))) || !NILP (current_buffer->truncate_lines)) { - /* Truncating: skip to newline. */ - if (pos <= to) /* This IF is needed because we may past TO */ + /* Truncating: skip to newline, unless we are already past + TO (we need to go back below). */ + if (pos <= to) { pos = find_before_next_newline (pos, to, 1); pos_byte = CHAR_TO_BYTE (pos); + hpos = width; + /* If we just skipped next_boundary, + loop around in the main while + and handle it. */ + if (pos >= next_boundary) + next_boundary = pos + 1; + prev_hpos = width; + prev_tab_offset = tab_offset; } - hpos = width; - /* If we just skipped next_boundary, - loop around in the main while - and handle it. */ - if (pos >= next_boundary) - next_boundary = pos + 1; - prev_hpos = width; - prev_tab_offset = tab_offset; } else {