20c621c5ce
- The lsp modeline is used to provide information about the server status so it should not be be hidden.
74 lines
2.4 KiB
EmacsLisp
74 lines
2.4 KiB
EmacsLisp
;;; packages.el --- Language Server Protocol Layer packages file for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2018 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Fangrui Song <i@maskray.me>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
(defconst lsp-packages
|
|
'(
|
|
lsp-mode
|
|
lsp-ui
|
|
(lsp-imenu :requires imenu :location built-in)
|
|
(lsp-ui-imenu :requires lsp-imenu :location built-in)
|
|
(company-lsp :requires company)
|
|
;; `flycheck-lsp' does not exist so we defined it as built-in to avoid
|
|
;; fetching it from ELPA repositories.
|
|
;; this logical package serves to hook all flycheck related configuration
|
|
;; for LSP.
|
|
(flycheck-lsp :requires flycheck :location built-in)
|
|
))
|
|
|
|
(defun lsp/init-lsp-mode ()
|
|
(use-package lsp-mode
|
|
:defer t
|
|
:config
|
|
(progn
|
|
(evil-set-command-property 'lsp-goto-type-definition :jump t)
|
|
(evil-set-command-property 'lsp-goto-implementation :jump t))))
|
|
|
|
(defun lsp/init-company-lsp ()
|
|
(use-package company-lsp
|
|
:defer t
|
|
:init
|
|
;; Language servers have better idea filtering and sorting,
|
|
;; don't filter results on the client side.
|
|
(setq company-transformers nil
|
|
company-lsp-async t
|
|
company-lsp-cache-candidates nil)))
|
|
|
|
(defun lsp/init-flycheck-lsp ()
|
|
;; Disable lsp-flycheck.el in favor of lsp-ui-flycheck.el
|
|
(setq lsp-enable-flycheck nil))
|
|
|
|
(defun lsp/init-lsp-ui ()
|
|
(use-package lsp-ui
|
|
:defer t
|
|
:init (add-hook 'lsp-mode-hook #'lsp-ui-mode)
|
|
:config
|
|
(progn
|
|
(spacemacs//lsp-sync-peek-face)
|
|
(add-hook 'spacemacs-post-theme-change-hook #'spacemacs//lsp-sync-peek-face)
|
|
|
|
(if lsp-ui-remap-xref-keybindings
|
|
(progn (define-key lsp-ui-mode-map [remap xref-find-definitions] #'lsp-ui-peek-find-definitions)
|
|
(define-key lsp-ui-mode-map [remap xref-find-references] #'lsp-ui-peek-find-references)))
|
|
|
|
(spacemacs/lsp-define-key
|
|
lsp-ui-peek-mode-map
|
|
"h" #'lsp-ui-peek--select-prev-file
|
|
"j" #'lsp-ui-peek--select-next
|
|
"k" #'lsp-ui-peek--select-prev
|
|
"l" #'lsp-ui-peek--select-next-file
|
|
)
|
|
)))
|
|
|
|
(defun lsp/init-lsp-imenu ()
|
|
(use-package lsp-imenu :defer t :init (add-hook 'lsp-after-open-hook #'lsp-enable-imenu)))
|
|
|
|
(defun lsp/init-lsp-ui-imenu ()
|
|
(use-package lsp-ui-imenu :defer t :config (evil-make-overriding-map lsp-ui-imenu-mode-map)))
|