github/doom-modeline
1
0
Fork 0
mirror of https://github.com/correl/doom-modeline.git synced 2024-11-27 19:19:53 +00:00
Code Issues Projects Releases Packages Wiki Activity

[Feature] An indicator for LSP state.

Browse source 
See https://github.com/emacs-lsp/lsp-mode/issues/479#issuecomment-443992922.
This commit is contained in:
Vincent Zhang 2018-12-06 03:26:27 +08:00
parent 8d6974bb65
commit f73eba86fa
2 changed files with 19 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
README.md
View file

@ -31,6 +31,7 @@ The `doom-modeline` was designed for minimalism and fast, and offers:
- An indicator for `xah-fly-keys` state - An indicator for `xah-fly-keys` state
- An indicator for remote host - An indicator for remote host
- An indicator for current input method - An indicator for current input method
- An indicator for `LSP` state
- Truncated file names, file icon, buffer state and project name in buffer - Truncated file names, file icon, buffer state and project name in buffer
information segment, which is compatible with `projectile` or `project` information segment, which is compatible with `projectile` or `project`

19
doom-modeline.el
View file

@ -49,6 +49,7 @@
;; - An indicator for xah-fly-keys state ;; - An indicator for xah-fly-keys state
;; - An indicator for remote host ;; - An indicator for remote host
;; - An indicator for current input method ;; - An indicator for current input method
;; - An indicator for LSP state
;; - Truncated file names, file icon, buffer state and project name in buffer ;; - Truncated file names, file icon, buffer state and project name in buffer
;; information segment, which is compatible with projectile or project ;; information segment, which is compatible with projectile or project
;; ;;
@ -184,6 +185,7 @@ It returns a file name which can be used directly as argument of
(declare-function iedit-find-current-occurrence-overlay 'iedit-lib) (declare-function iedit-find-current-occurrence-overlay 'iedit-lib)
(declare-function iedit-prev-occurrence 'iedit-lib) (declare-function iedit-prev-occurrence 'iedit-lib)
(declare-function image-get-display-property 'image-mode) (declare-function image-get-display-property 'image-mode)
(declare-function lsp-mode-line 'lsp-mode)
(declare-function magit-toplevel 'magit-git) (declare-function magit-toplevel 'magit-git)
(declare-function safe-persp-name 'persp-mode) (declare-function safe-persp-name 'persp-mode)
(declare-function get-current-persp 'persp-mode) (declare-function get-current-persp 'persp-mode)
@ -886,8 +888,7 @@ mouse-3: Toggle minor modes"
(doom-modeline-def-segment minor-modes (doom-modeline-def-segment minor-modes
(when doom-modeline-minor-modes (when doom-modeline-minor-modes
(propertize (propertize
(concat " " (concat (format-mode-line `(:propertize ("" minor-mode-alist)))
(format-mode-line `(:propertize ("" minor-mode-alist)))
" ") " ")
'face (if (doom-modeline--active) 'doom-modeline-buffer-minor-mode)))) 'face (if (doom-modeline--active) 'doom-modeline-buffer-minor-mode))))
@ -1438,13 +1439,23 @@ See `mode-line-percent-position'.")
'face 'doom-modeline-buffer-major-mode))) 'face 'doom-modeline-buffer-major-mode)))
;;
;; LSP
;;
(doom-modeline-def-segment lsp
"The LSP server state."
(if (and (doom-modeline--active)
(bound-and-true-p lsp-mode))
(concat (lsp-mode-line) " ")))
;; ;;
;; Mode lines ;; Mode lines
;; ;;
(doom-modeline-def-modeline 'main (doom-modeline-def-modeline 'main
'(bar workspace-number window-number evil-state god-state ryo-modal xah-fly-keys matches " " buffer-info remote-host buffer-position " " selection-info) '(bar workspace-number window-number evil-state god-state ryo-modal xah-fly-keys matches " " buffer-info remote-host buffer-position " " selection-info)
'(global persp-name minor-modes input-method buffer-encoding major-mode process vcs flycheck)) '(global persp-name lsp minor-modes input-method buffer-encoding major-mode process vcs flycheck))
(doom-modeline-def-modeline 'minimal (doom-modeline-def-modeline 'minimal
'(bar matches " " buffer-info) '(bar matches " " buffer-info)
@ -1452,7 +1463,7 @@ See `mode-line-percent-position'.")
(doom-modeline-def-modeline 'special (doom-modeline-def-modeline 'special
'(bar window-number evil-state god-state ryo-modal xah-fly-keys matches " " buffer-info-simple buffer-position " " selection-info) '(bar window-number evil-state god-state ryo-modal xah-fly-keys matches " " buffer-info-simple buffer-position " " selection-info)
'(global input-method buffer-encoding major-mode process flycheck)) '(global lsp minor-modes input-method buffer-encoding major-mode process flycheck))
(doom-modeline-def-modeline 'project (doom-modeline-def-modeline 'project
'(bar window-number buffer-default-directory) '(bar window-number buffer-default-directory)