Fix horizontal scrolling during Isearch
* lisp/isearch.el (isearch-update): Compute the window's body width in a way that is correct when there are no fringes. (Bug#24584)
This commit is contained in:
parent
3566644a33
commit
197a6bcc20
1 changed files with 2 additions and 1 deletions
|
@ -1012,7 +1012,8 @@ The last thing is to trigger a new round of lazy highlighting."
|
|||
;; pos-visible-in-window-group-p returns non-nil, but
|
||||
;; the X coordinate it returns is 1 pixel beyond
|
||||
;; the last visible one.
|
||||
(>= (car visible-p) (window-body-width nil t)))
|
||||
(>= (car visible-p)
|
||||
(* (window-max-chars-per-line) (frame-char-width))))
|
||||
(set-window-hscroll (selected-window) current-scroll))))
|
||||
(if isearch-other-end
|
||||
(if (< isearch-other-end (point)) ; isearch-forward?
|
||||
|
|
Loading…
Add table
Reference in a new issue