Refactor lsp

1 files changed, 32 insertions, 0 deletions

diff --git a/fnl/config/lsp/diagnostics.fnl b/fnl/config/lsp/diagnostics.fnl
new file mode 100644
index 0000000..adf098d
--- /dev/null
+++ b/fnl/config/lsp/diagnostics.fnl
@@ -0,0 +1,32 @@
+;; 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 false
+              :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})))