Update hooks for lsp indicator.

See https://github.com/emacs-lsp/lsp-mode/issues/726.
This commit is contained in:
Vincent Zhang 2019-03-23 01:49:20 +08:00
parent 5774186d18
commit 7b9a1e5dd6

View file

@ -138,7 +138,6 @@
(declare-function image-get-display-property 'image-mode)
(declare-function jsonrpc--request-continuations 'jsonrpc)
(declare-function jsonrpc-last-error 'jsonrpc)
(declare-function lsp--cleanup-hanging-watches 'lsp-mode)
(declare-function lsp--workspace-print 'lsp-mode)
(declare-function lsp-describe-session 'lsp-mode)
(declare-function lsp-restart-workspace 'lsp-mode)
@ -1537,7 +1536,7 @@ mouse-3: Describe current input method")
;;
(defvar doom-modeline--lsp nil)
(defun doom-modeline-update-lsp (&rest _)
(defun doom-modeline-update-lsp ()
"Update `lsp-mode' status."
(setq doom-modeline--lsp
(concat
@ -1581,7 +1580,7 @@ mouse-1: Reload to start server")
map)))
" ")))
(add-hook 'lsp-mode-hook #'doom-modeline-update-lsp)
(advice-add #'lsp--cleanup-hanging-watches :after #'doom-modeline-update-lsp)
(add-hook 'lsp-after-uninitialized-hook #'doom-modeline-update-lsp)
(defvar doom-modeline--eglot nil)
(defun doom-modeline-update-eglot ()