Move what you can to LSP
This commit is contained in:
parent
55b75ab70c
commit
55735b37c5
GPG key ID:
41D62D42D3B0D765
11 changed files with 44 additions and 138 deletions
|
|
@ -1,7 +1,7 @@
|
|||
(defun activate-clang-mode ()
|
||||
"Goodies for editing c files"
|
||||
(set-indent 4)
|
||||
(column-enforce-n 80)
|
||||
(set-indent 8)
|
||||
(column-enforce-n 100)
|
||||
|
||||
(add-to-list (make-local-variable 'company-backends)
|
||||
'(company-etags company-yasnippet))
|
||||
|
|
@ -13,4 +13,4 @@
|
|||
(projectile-project-root) (projectile-project-root)
|
||||
)))
|
||||
|
||||
(add-hook 'c-mode-hook 'activate-clang-mode)
|
||||
(add-hook 'c-mode 'activate-clang-mode)
|
||||
|
|
|
|||
|
|
@ -1,17 +1,17 @@
|
|||
(use-package alchemist
|
||||
:requires (ruby-end-mode)
|
||||
(use-package elixir-mode
|
||||
:requires (lsp-mode lsp-ui)
|
||||
:ensure t
|
||||
:defer t)
|
||||
:config)
|
||||
|
||||
(defun activate-elixir-mode ()
|
||||
"All things Elixir."
|
||||
(set-indent 2)
|
||||
(column-enforce-n 98)
|
||||
(setq-local flycheck-check-syntax-automatically '(save mode-enabled))
|
||||
(define-key elixir-mode-map (kbd "<f17>") 'elixir-format)
|
||||
|
||||
;; Company list override
|
||||
(add-to-list (make-local-variable 'company-backends)
|
||||
'(alchemist-company company-yasnippet)))
|
||||
'(company-capf company-yasnippet)))
|
||||
|
||||
(add-hook 'elixir-mode-hook 'alchemist-mode)
|
||||
(add-hook 'alchemist-mode-hook 'activate-elixir-mode)
|
||||
(add-hook 'elixir-mode-hook 'ruby-end-mode)
|
||||
(add-hook 'elixir-mode-hook 'activate-elixir-mode)
|
||||
|
|
|
|||
|
|
@ -1,15 +0,0 @@
|
|||
(use-package elm-mode
|
||||
:ensure t
|
||||
:defer t)
|
||||
|
||||
(defun activate-elm-mode ()
|
||||
"All things Elixir."
|
||||
(set-indent 2)
|
||||
(column-enforce-n 80)
|
||||
|
||||
;; Company list override
|
||||
(add-to-list (make-local-variable 'company-backends)
|
||||
'(elm-company company-yasnippet))
|
||||
(define-key elm-mode-map (kbd "TAB") 'elm-indent-cycle))
|
||||
|
||||
(add-hook 'elm-mode-hook 'activate-elm-mode)
|
||||
|
|
@ -1,3 +0,0 @@
|
|||
(use-package intero
|
||||
:defer t
|
||||
:ensure t)
|
||||
|
|
@ -1,111 +1,33 @@
|
|||
(use-package js2-mode
|
||||
:requires (web-mode company-web)
|
||||
:requires (web-mode company-web lsp-mode lsp-ui)
|
||||
:ensure t)
|
||||
|
||||
(use-package tide
|
||||
:ensure t
|
||||
:after (company flycheck)
|
||||
:hook ((before-save . tide-format-before-save)))
|
||||
|
||||
(use-package lsp-mode
|
||||
:ensure t
|
||||
:defer t
|
||||
:config (setq-default lsp-file-watch-threshold 10000)
|
||||
:hook (typescript-mode . lsp))
|
||||
|
||||
;; Use js2-mode for javascript editing
|
||||
(add-to-list 'auto-mode-alist '("\\.js\\'" . js2-mode))
|
||||
(add-to-list 'auto-mode-alist '("\\.jsx\\'" . js2-mode))
|
||||
(add-to-list 'auto-mode-alist '("\\.json\\'" . js2-mode))
|
||||
|
||||
;; Use js2-mode for typescript editing
|
||||
(add-to-list 'auto-mode-alist '("\\.ts\\'" . typescript-mode))
|
||||
(add-to-list 'auto-mode-alist '("\\.tsx\\'" . typescript-mode))
|
||||
|
||||
(defun activate-js2-mode ()
|
||||
"JS2 mode overrides."
|
||||
(tide-setup)
|
||||
(set-indent 2)
|
||||
|
||||
(when (not (string-match-p ".json" (buffer-file-name)))
|
||||
(lsp))
|
||||
|
||||
(column-enforce-n 80)
|
||||
(setq-local js2-basic-offset 2)
|
||||
(setq-local js2-strict-missing-semi-warning nil)
|
||||
(setq-local lsp-eldoc-enable-hover nil)
|
||||
(setq js2-mode-show-parse-errors nil)
|
||||
(setq js2-mode-show-strict-warnings nil)
|
||||
(tide-hl-identifier-mode +1)
|
||||
|
||||
(if (string-match-p "rebelroam" (buffer-file-name))
|
||||
(flycheck-add-next-checker 'javascript-standard 'javascript-tide 'append))
|
||||
|
||||
|
||||
(setq-local lsp-eldoc-enable-hover nil)
|
||||
(setq-local flycheck-check-syntax-automatically '(save mode-enabled))
|
||||
|
||||
;; "Company list override."
|
||||
(add-to-list (make-local-variable 'company-backends)
|
||||
'(company-yasnippet company-tide)))
|
||||
'(company-yasnippet company-capf)))
|
||||
|
||||
(add-hook 'js2-mode-hook 'activate-js2-mode)
|
||||
|
||||
(defun activate-typescript-mode ()
|
||||
(set-indent 2)
|
||||
(column-enforce-n 80))
|
||||
|
||||
;; Magic for LSP mode
|
||||
(with-eval-after-load 'lsp-mode
|
||||
;; enable log only for debug
|
||||
(setq lsp-log-io nil)
|
||||
|
||||
;; use `evil-matchit' instead
|
||||
(setq lsp-enable-folding nil)
|
||||
|
||||
;; no real time syntax check
|
||||
(setq lsp-diagnostic-package :none)
|
||||
|
||||
;; handle yasnippet by myself
|
||||
(setq lsp-enable-snippet nil)
|
||||
|
||||
;; use `company-ctags' only.
|
||||
;; Please note `company-lsp' is automatically enabled if installed
|
||||
(setq lsp-enable-completion-at-point nil)
|
||||
|
||||
;; turn off for better performance
|
||||
(setq lsp-enable-symbol-highlighting nil)
|
||||
|
||||
;; use ffip instead
|
||||
(setq lsp-enable-links nil)
|
||||
|
||||
;; auto restart lsp
|
||||
(setq lsp-restart 'auto-restart)
|
||||
|
||||
;; @see https://github.com/emacs-lsp/lsp-mode/pull/1498 and code related to auto configure.
|
||||
;; Require clients could be slow.
|
||||
;; I only load `lsp-clients' because it includes the js client which I'm interested
|
||||
(setq lsp-client-packages '(lsp-clients))
|
||||
|
||||
;; don't scan 3rd party javascript libraries
|
||||
(push "[/\\\\][^/\\\\]*\\.\\(json\\|html\\|jade\\)$" lsp-file-watch-ignored) ; json
|
||||
|
||||
;; don't ping LSP lanaguage server too frequently
|
||||
(defvar lsp-on-touch-time 0)
|
||||
(defadvice lsp-on-change (around lsp-on-change-hack activate)
|
||||
;; don't run `lsp-on-change' too frequently
|
||||
(when (> (- (float-time (current-time))
|
||||
lsp-on-touch-time) 30) ;; 30 seconds
|
||||
(setq lsp-on-touch-time (float-time (current-time)))
|
||||
ad-do-it)))
|
||||
|
||||
(defun my-connect-lsp (&optional no-reconnect)
|
||||
"Connect lsp server. If NO-RECONNECT is t, don't shutdown existing lsp connection."
|
||||
(interactive "P")
|
||||
(when (and (not no-reconnect)
|
||||
(fboundp 'lsp-disconnect))
|
||||
(lsp-disconnect))
|
||||
(when (and buffer-file-name
|
||||
(not (member (file-name-extension buffer-file-name)
|
||||
'("json"))))
|
||||
(unless (and (boundp 'lsp-mode) lsp-mode)
|
||||
(if (derived-mode-p 'js2-mode) (setq-local lsp-enable-imenu nil))
|
||||
(lsp-deferred))))
|
||||
|
||||
|
||||
(add-hook 'typescript-mode 'activate-typescript-mode)
|
||||
(add-hook 'typescript-mode 'my-connect-lsp)
|
||||
|
|
|
|||
|
|
@ -1,7 +0,0 @@
|
|||
(use-package kotlin-mode
|
||||
:ensure t
|
||||
:defer t)
|
||||
|
||||
(use-package gradle-mode
|
||||
:ensure t
|
||||
:defer t)
|
||||
|
|
@ -2,8 +2,7 @@
|
|||
:defer t
|
||||
:ensure t
|
||||
:config
|
||||
(add-hook 'tuareg-mode-hook 'merlin-mode)
|
||||
)
|
||||
(add-hook 'tuareg-mode-hook 'merlin-mode))
|
||||
|
||||
(use-package merlin
|
||||
:defer t
|
||||
|
|
|
|||
|
|
@ -1,7 +1,3 @@
|
|||
(use-package racer
|
||||
:ensure t
|
||||
:requires (racer flycheck-rust))
|
||||
|
||||
(defun activate-rust-mode ()
|
||||
"All things for Rust mode"
|
||||
(interactive)
|
||||
|
|
@ -14,5 +10,4 @@
|
|||
)
|
||||
|
||||
(add-hook 'rust-mode-hook 'activate-rust-mode)
|
||||
(add-hook 'rust-mode-hook 'racer-mode)
|
||||
(add-hook 'rust-mode-hook 'flycheck-rust-setup)
|
||||
|
|
|
|||
|
|
@ -8,9 +8,6 @@
|
|||
;; ERB mode
|
||||
(add-to-list 'auto-mode-alist '("\\.erb\\'" . web-mode))
|
||||
|
||||
;; Vue
|
||||
(add-to-list 'auto-mode-alist '("\\.vue\\'" . web-mode))
|
||||
|
||||
;; React Typescript
|
||||
(add-to-list 'auto-mode-alist '("\\.tsx\\'" . web-mode))
|
||||
|
||||
|
|
@ -28,14 +25,13 @@
|
|||
;; Indent web mode scripts by 2
|
||||
(setq web-mode-script-padding 2)
|
||||
(setq web-mode-code-indent-offset 2)
|
||||
|
||||
(flycheck-add-next-checker 'javascript-standard 'javascript-tide 'append)
|
||||
(setq-local lsp-eldoc-enable-hover nil)
|
||||
(setq-local flycheck-check-syntax-automatically '(save mode-enabled))
|
||||
|
||||
(add-to-list (make-local-variable 'company-backends)
|
||||
'(company-yasnippet company-tide))
|
||||
'(company-yasnippet capf))
|
||||
|
||||
(when (string-match-p "jsx" (buffer-file-name))
|
||||
(tide-setup)))
|
||||
(lsp)))
|
||||
|
||||
(add-hook 'web-mode-hook 'activate-web-mode)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue