make fourmolu happy

src/StaticLS/IDE/InlayHints.hs

@@ -50,7 +50,7 @@ getTypedefInlays absPath getTypes = do
 fmtTypeStr :: Text -> Text
 fmtTypeStr text
   | text == "" = ""
-  | Text.length text > 50 = "" -- hide overly long inlays and buggy inlays 
+  | Text.length text > 50 = "" -- hide overly long inlays and buggy inlays
   | otherwise = " :: " <> text
 
 getTypedefInlays_ :: AbsPath -> StaticLsM [InlayHint]
@@ -65,7 +65,7 @@ getTypedefInlays_ absPath = do
       getTypedefInlays absPath getTypes
 
 nodeToDescendants :: DynNode -> [DynNode]
-nodeToDescendants node = node : (nodeToDescendants. getDynNode =<< node.nodeChildren)
+nodeToDescendants node = node : (nodeToDescendants . getDynNode =<< node.nodeChildren)
 
 selectNodesToType :: DynNode -> [DynNode]
 selectNodesToType root = do

src/StaticLS/Server.hs

@@ -196,7 +196,7 @@ serverDef argOptions logger = do
       , configSection = ""
       , parseConfig = \_conf _value -> Right ()
       , doInitialize = do
-           initServer reactorChan argOptions logger
+          initServer reactorChan argOptions logger
       , -- TODO: Do handlers need to inspect clientCapabilities?
         staticHandlers = \_clientCapabilities ->
           mapHandlers goReq goNot $
@@ -221,11 +221,11 @@ serverDef argOptions logger = do
               , handleResolveCodeAction
               , handleDocumentSymbols
               , handleCompletion
-	      -- Disabled. Will enable in its own branch
-              -- , handleInlayHintRequest 
-              -- Currently disabled until we support configuration for the formatter
+              , -- Disabled. Will enable in its own branch
+                -- , handleInlayHintRequest
+                -- Currently disabled until we support configuration for the formatter
                 -- , handleFormat
-              , handleCompletionItemResolve
+                handleCompletionItemResolve
               ]
       , interpretHandler = \env -> Iso (LSP.runLspT env) liftIO
       , options = lspOptions