blob: 96b50e69a01b7c7c1b647f53ddfbd220fe39bffc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
;; Handlers for the requests and responses from and to the lsp server.
(module config.lsp.handlers {autoload {util config.util nvim aniseed.nvim}})
(def- signs [{:name :DiagnosticSignError :text ""}
{:name :DiagnosticSignWarn :text ""}
{:name :DiagnosticSignHint :text ""}
{:name :DiagnosticSignInfo :text ""}])
(defn- apply-signs [] (each [_ sign (ipairs signs)]
(vim.fn.sign_define sign.name
{:texthl sign.name
:text sign.text
:numhl ""})))
(def- config {:virtual_text false
:signs {:active signs}
:update_in_insert true
:underline true
:severity_sort true
:float {:focusable false
:style :minimal
:border :rounded
:source :always
:header ""
:prefix ""}})
(defn setup [] (apply-signs) (vim.diagnostic.config config)
(set vim.lsp.handlers.textDocument/hover
(vim.lsp.with {:border :rounded :width 60}))
(set vim.lsp.handlers.textDocument/signatureHelp
(vim.lsp.with vim.lsp.handlers.signature_help
{:border :rounded :width 60})))
(defn- lsp-keymaps [bufnr]
(let [opts {:noremap true :silent true}]
(nvim.buf_set_keymap bufnr :n :gD
"<cmd>lua vim.lsp.buf.declaration()<CR>" opts)
(nvim.buf_set_keymap bufnr :n :gd
"<cmd>lua vim.lsp.buf.definition()<CR>" opts)
(nvim.buf_set_keymap bufnr :n :gI
"<cmd>lua vim.lsp.buf.implementation()<CR>" opts)
(nvim.buf_set_keymap bufnr :n :gr
"<cmd>lua vim.lsp.buf.references()<CR>" opts)
(nvim.buf_set_keymap bufnr :n :gl
"<cmd>lua vim.diagnostic.open_float()<CR>" opts)
(nvim.buf_set_keymap bufnr :n :gs
"<cmd>lua vim.lsp.buf.signature_help()<CR>" opts)))
(defn on-attach [client bufnr] (if (= client.name :html)
(set client.server_capabilities.document_formatting
false))
(lsp-keymaps bufnr))
(defn capabilities []
(let [capabilities (vim.lsp.protocol.make_client_capabilities)]
(set capabilities.textDocument.completion.completionItem.snippetSupport
true)
(let [cmp-nvim-lsp (util.prequire :cmp_nvim_lsp)]
(cmp-nvim-lsp.default_capabilities capabilities))))
|
