1d45278a71
lsp-use-upstream-bindings is t so by default spacemacs will use lsp-mode binding scheme. We should consider to phase our the current manual binding scheme for lsp-mode in future
97 lines
3.4 KiB
EmacsLisp
97 lines
3.4 KiB
EmacsLisp
;;; packages.el --- Language Server Protocol Layer packages file for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2021 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Fangrui Song <i@maskray.me>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;; This program is free software; you can redistribute it and/or modify
|
|
;; it under the terms of the GNU General Public License as published by
|
|
;; the Free Software Foundation, either version 3 of the License, or
|
|
;; (at your option) any later version.
|
|
;;
|
|
;; This program is distributed in the hope that it will be useful,
|
|
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
;; GNU General Public License for more details.
|
|
;;
|
|
;; You should have received a copy of the GNU General Public License
|
|
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
|
(defconst lsp-packages
|
|
'(
|
|
lsp-mode
|
|
(lsp-ui :toggle lsp-use-lsp-ui)
|
|
(consult-lsp :requires consult)
|
|
(helm-lsp :requires helm)
|
|
(lsp-ivy :requires ivy)
|
|
(lsp-treemacs :requires treemacs)
|
|
(lsp-origami :requires lsp-mode)
|
|
popwin))
|
|
|
|
(defun lsp/init-lsp-mode ()
|
|
(use-package lsp-mode
|
|
:defer t
|
|
:init
|
|
(setq lsp-server-install-dir (concat spacemacs-cache-directory "lsp/")
|
|
lsp-session-file (concat lsp-server-install-dir (file-name-nondirectory ".lsp-session-v1"))
|
|
lsp-eslint-library-choices-file (concat lsp-server-install-dir ".lsp-eslint-choices")
|
|
lsp-yaml-schema-store-local-db (concat lsp-server-install-dir "lsp-yaml-schemas.json")
|
|
lsp-vetur-global-snippets-dir (concat spacemacs-start-directory "snippets/vetur"))
|
|
;; If you find something else should be ignored, you could also set them here
|
|
:config
|
|
(progn
|
|
(if lsp-use-upstream-bindings
|
|
(spacemacs/lsp-bind-upstream-keys)
|
|
(spacemacs/lsp-bind-keys))
|
|
(setq lsp-prefer-capf t)
|
|
(add-hook 'lsp-after-open-hook (lambda ()
|
|
"Setup xref jump handler"
|
|
(spacemacs//setup-lsp-jump-handler))))))
|
|
|
|
(defun lsp/init-lsp-ui ()
|
|
(use-package lsp-ui
|
|
:defer t
|
|
:config
|
|
(progn
|
|
(if lsp-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-helm-lsp ()
|
|
(use-package helm-lsp :defer t))
|
|
|
|
(defun lsp/init-lsp-ivy ()
|
|
(use-package lsp-ivy :defer t))
|
|
|
|
(defun lsp/init-consult-lsp ()
|
|
(use-package consult-lsp
|
|
:defer t
|
|
:after (lsp-mode)
|
|
:config
|
|
(consult-lsp-marginalia-mode 1)))
|
|
|
|
(defun lsp/init-lsp-treemacs ()
|
|
(use-package lsp-treemacs :defer t))
|
|
|
|
(defun lsp/init-lsp-origami ()
|
|
(use-package lsp-origami
|
|
:defer t
|
|
:init
|
|
(add-hook 'lsp-after-open-hook #'lsp-origami-try-enable)))
|
|
|
|
(defun lsp/pre-init-popwin ()
|
|
(spacemacs|use-package-add-hook popwin
|
|
:post-config
|
|
(push '("*lsp-help*" :dedicated t :position bottom :stick t :noselect t :height 0.4)
|
|
popwin:special-display-config)))
|