mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-08 15:35:02 +00:00
Code Issues Releases Activity

Eglot: update inlay hints on window configuration changes

Browse Source 
* lisp/progmodes/eglot.el
(eglot--inlay-hints-after-window-config-change): New helper.
(eglot-inlay-hints-mode): Use it.
This commit is contained in:
João Távora 2023-02-23 19:18:41 +00:00
parent 79fead1709
commit 91e24c5b5a
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/progmodes/eglot.el
View File

@ -3572,6 +3572,9 @@ This value is only meaningful if the minor mode
(window-end window))
(wsetq eglot--inlay-hints-timer nil))))))))))
(defun eglot--inlay-hints-after-window-config-change ()
(eglot--update-hints-1 (window-start) (window-end)))
(define-minor-mode eglot-inlay-hints-mode
"Minor mode for annotating buffers with LSP server's inlay hints."
:global nil
@ -3585,6 +3588,8 @@ This value is only meaningful if the minor mode
#'eglot--inlay-hints-lazily t t)
(add-hook 'window-scroll-functions
#'eglot--inlay-hints-after-scroll nil t)
(add-hook 'window-configuration-change-hook
#'eglot--inlay-hints-after-window-config-change nil t)
;; Maybe there isn't a window yet for current buffer,
;; so `run-at-time' ensures this runs after redisplay.
(run-at-time 0 nil #'eglot--inlay-hints-lazily))
@ -3593,6 +3598,8 @@ This value is only meaningful if the minor mode
#'eglot--inlay-hints-fully nil t)
(eglot--inlay-hints-fully))))
(t
(remove-hook 'window-configuration-change-hook
#'eglot--inlay-hints-after-window-config-change)
(remove-hook 'eglot--document-changed-hook
#'eglot--inlay-hints-lazily t)
(remove-hook 'eglot--document-changed-hook