summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorGregory Heytings <gregory@heytings.org>2022-07-18 10:08:33 +0000
committerGregory Heytings <gregory@heytings.org>2022-07-18 12:11:08 +0200
commitcc7f37b2a41afe2dccd015de2b2a70e20c6e323f (patch)
tree9a3d3bb98be90b3f2c9bca2b92c8b9fcc1a06f59 /src
parent66704fbbcf662666dbf0351fe7ae8b3bf2fbb3ca (diff)
Further improvements to long lines handling.
* src/xdisp.c (get_visually_first_element): Fix segfault. (get_narrowed_begv): Specific improvement for character-only terminals.
Diffstat (limited to 'src')
-rw-r--r--src/xdisp.c19
1 files changed, 16 insertions, 3 deletions
diff --git a/src/xdisp.c b/src/xdisp.c
index 98bf15a8594..d69d7440bc0 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -3501,9 +3501,12 @@ init_iterator (struct it *it, struct window *w,
ptrdiff_t
get_narrowed_begv (struct window *w)
{
- int len; ptrdiff_t begv;
- len = 3 * (window_body_width (w, WINDOW_BODY_IN_CANONICAL_CHARS) *
- window_body_height (w, WINDOW_BODY_IN_CANONICAL_CHARS));
+ int len, fact; ptrdiff_t begv;
+ /* In a character-only terminal, only one font size is used, so we
+ can use a smaller factor. */
+ fact = EQ (Fterminal_live_p (Qnil), Qt) ? 2 : 3;
+ len = fact * (window_body_width (w, WINDOW_BODY_IN_CANONICAL_CHARS) *
+ window_body_height (w, WINDOW_BODY_IN_CANONICAL_CHARS));
begv = max ((window_point (w) / len - 1) * len, BEGV);
return begv == BEGV ? 0 : begv;
}
@@ -8668,6 +8671,16 @@ get_visually_first_element (struct it *it)
SET_WITH_NARROWED_BEGV (it, bob, string_p ? 0 : BEGV);
+ /* Reseat again when, as a consequence of the SET_WITH_NARROWED_BEGV
+ above, the iterator is before bob. */
+ if (!string_p && IT_CHARPOS (*it) < bob)
+ {
+ struct text_pos pos;
+ pos.charpos = bob;
+ pos.bytepos = CHAR_TO_BYTE (bob);
+ reseat (it, pos, true);
+ }
+
if (STRINGP (it->string))
{
it->bidi_it.charpos = IT_STRING_CHARPOS (*it);