this repo has no description
fix: do not remove autocommands after first run
+18
-22
+4
-14
vim/.config/nvim/fnl/langclient.fnl
+4
-14
vim/.config/nvim/fnl/langclient.fnl
···
14
14
(set lsp.handlers.textDocument/signatureHelp (lsp.with lsp.handlers.signature_help {:border border}))
15
15
(vim.diagnostic.config {:float {:border border} :virtual_text false}))
16
16
17
-
; workaround for Lexical to not spit out the snippets params
18
-
(let [old vim.lsp.util.parse_snippet]
19
-
(set vim.lsp.util.parse_snippet (fn [input]
20
-
(let [result (fun.match input "[^[:keyword:]]")]
21
-
(print result)
22
-
(input:sub 1 result)))))
23
-
24
17
(augroup hauleth-lsp
25
-
(on LspAttach "*"
18
+
(on LspAttach
26
19
(let [bufnr args.buf
27
20
client (vim.lsp.get_client_by_id args.data.client_id)]
28
21
((. (require :fidget) :setup) {})
···
30
23
(local capable?
31
24
(fn [capability]
32
25
(. client.server_capabilities capability)))
33
-
(augroup lsp-diagnostics
34
-
(on CursorHold "*" (vim.diagnostic.open_float {:focus false}))
35
-
(on BufEnter,CursorHold,InsertLeave "*" (vim.lsp.codelens.refresh)))
36
26
(when (capable? :declarationProvider)
37
27
(bmap :n :gD #(vim.lsp.buf.declaration)))
38
28
(when (capable? :referencesProvider)
···
42
32
(when (capable? :documentSymbolProvider)
43
33
(bmap :n :gO #(picker.lsp_document_symbols))))))
44
34
35
+
(augroup hauleth-lsp-diagnostics
36
+
(on CursorHold "*" (vim.diagnostic.open_float {:focus false}) nil))
45
37
46
38
47
39
(set configs.lexical {
···
56
48
{:autostart false}))
57
49
58
50
59
-
(vim.diagnostic.config {:virtual_text false})
60
-
61
51
(fn setup [name opts]
62
52
((. (. lspconfig name) :setup) opts))
63
53
···
71
61
72
62
(setup :nixd {:autostart true})
73
63
74
-
(augroup lsp-direnv (on User :DirenvLoaded (cmd.LspStart)))
64
+
(augroup lsp-direnv (on User :DirenvLoaded (cmd.LspStart) nil))
+10
-5
vim/.config/nvim/fnl/nvim/macro-init.fnl
+10
-5
vim/.config/nvim/fnl/nvim/macro-init.fnl
···
3
3
(fn on [event pattern ...]
4
4
"Run command on `event`"
5
5
(let [args (sym :args)
6
-
body `(fn [,args] ,...)]
7
-
`(vim.api.nvim_create_autocmd ,(view event)
8
-
{:pattern ,pattern
9
-
:callback ,body
10
-
:group au-id})))
6
+
body (if (list? pattern)
7
+
`(fn [,args] ,pattern ,...)
8
+
`(fn [,args] ,...))
9
+
opts (if (list? pattern)
10
+
`{:callback ,body
11
+
:group au-id}
12
+
`{:pattern ,pattern
13
+
:callback ,body
14
+
:group au-id})]
15
+
`(vim.api.nvim_create_autocmd ,(view event) ,opts)))
11
16
12
17
(fn augroup [name ...]
13
18
"Define auto group"
+4
-3
vim/.config/nvim/init.fnl
+4
-3
vim/.config/nvim/init.fnl
···
207
207
(set vim.g.matchup_matchparen_offscreen {:method :popup})
208
208
(augroup matchparen
209
209
(let [term "term://*"]
210
-
(on BufEnter term (cmd.NoMatchParen))
211
-
(on BufLeave term (cmd.DoMatchParen)))))
210
+
(on BufEnter term (cmd.NoMatchParen) nil)
211
+
(on BufLeave term (cmd.DoMatchParen) nil))))
212
212
213
213
(do ; Autoreload Direnv after writing the .envrc
214
214
(when (fun.executable :direnv)
215
215
(augroup autoreload-envrc
216
216
(on BufWritePost :.envrc
217
217
(fun.system ["direnv" "allow" (fun.expand "%")])
218
-
(cmd.DirenvExport)))))
218
+
(cmd.DirenvExport)
219
+
nil))))
219
220
220
221
(do ; Setup Lua extensions
221
222
(let [setup (fn [package config]