Formatting Main.hs

This commit is contained in:
Kirill Andreev 2020-06-02 16:27:19 +04:00
parent 9856476ebf
commit 95707100c2
No known key found for this signature in database
GPG Key ID: CF7DA79DE4785A47

View File

@ -68,13 +68,14 @@ syncOptions = J.TextDocumentSyncOptions
}
lspOptions :: Core.Options
lspOptions = def { Core.textDocumentSync = Just syncOptions
lspOptions = def
{ Core.textDocumentSync = Just syncOptions
, Core.executeCommandCommands = Just ["lsp-hello-command"]
}
lspHandlers :: TChan FromClientMessage -> Core.Handlers
lspHandlers rin
= def { Core.initializedHandler = Just $ passHandler rin NotInitialized
lspHandlers rin = def
{ Core.initializedHandler = Just $ passHandler rin NotInitialized
, Core.renameHandler = Just $ passHandler rin ReqRename
, Core.hoverHandler = Just $ passHandler rin ReqHover
, Core.didOpenTextDocumentNotificationHandler = Just $ passHandler rin NotDidOpenTextDocument