From 3021ecdedd3883911ca2db2357311f7fecdbd667 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 22 Apr 2021 14:01:42 +0300 Subject: [PATCH] Fix Isearch hscrolling in a corner case * lisp/isearch.el (isearch-update): When we start hscrolled, consider also the case that point ends up being to the left of the hscrolled window's edge. (Bug#46316) --- lisp/isearch.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index f1c61fc1677..9f3cfd70fb3 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -1374,7 +1374,8 @@ The last thing is to trigger a new round of lazy highlighting." ;; the X coordinate it returns is 1 pixel beyond ;; the last visible one. (>= (car visible-p) - (* (window-max-chars-per-line) (frame-char-width)))) + (* (window-max-chars-per-line) (frame-char-width))) + (< (car visible-p) 0)) (set-window-hscroll (selected-window) current-scroll)))) (if isearch-other-end (if (< isearch-other-end (point)) ; isearch-forward? -- 2.39.2