Skip to content

Commit

Permalink
fix: Still redisplay
Browse files Browse the repository at this point in the history
  • Loading branch information
jcs090218 committed Jul 13, 2024
1 parent dd1313b commit e285892
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions auto-scroll-bar.el
Original file line number Diff line number Diff line change
Expand Up @@ -143,8 +143,7 @@ and SHOW-H."
(with-selected-window win
(if (auto-scroll-bar--disabled-p)
(auto-scroll-bar--update win nil nil)
(let* ((wend (or (and (not (elenv-frame-util-p)) ; force refresh
(window-parameter win 'window-end))
(let* ((wend (or (window-parameter win 'window-end)
(set-window-parameter win 'window-end
(window-end nil t))))
(wstart (window-start))
Expand Down Expand Up @@ -183,7 +182,8 @@ Optional argument FRAME is used to select frame's minibuffer."
;; The hook `window-scroll-functions' doesn't get called on horizontal scroll.
(defun auto-scroll-bar--post-command (&rest _)
"Hook for post-command."
(set-window-parameter nil 'window-end nil)
(dolist (win (window-list-1 nil nil t))
(set-window-parameter win 'window-end nil))
(auto-scroll-bar--scroll (selected-window)))

(defun auto-scroll-bar--enable ()
Expand Down

0 comments on commit e285892

Please sign in to comment.