import Language.Haskell.LSP.Test
import Language.Haskell.LSP.Types
-main = runSession "hie --lsp" "test/recordings/renamePass" $ do
+main = runSession "hie --lsp" fullCaps "test/data/renamePass" $ do
docItem <- openDoc "Desktop/simple.hs" "haskell"
-- Use your favourite favourite combinators.
-- Send requests and notifications and receive responses
let params = DocumentSymbolParams docItem
- response <- sendRequest TextDocumentDocumentSymbol params :: Session DocumentSymbolsResponse
- liftIO $ print response
+ rsp <- request TextDocumentDocumentSymbol params :: Session DocumentSymbolsResponse
+ liftIO $ print rsp
-- Or use one of the helper functions
getDocumentSymbols docItem >>= liftIO . print