mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
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)
This commit is contained in:
parent
7792f7b3f3
commit
3021ecdedd
1 changed files with 2 additions and 1 deletions
|
|
@ -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?
|
||||
|
|
|
|||
Loading…
Reference in a new issue