import Control.Monad.IO.Class
-main = runSession "test/recordings/renamePass" $ do
+main = runSession "hie" "test/recordings/renamePass" $ do
docItem <- getDocItem "Desktop/simple.hs" "haskell"
docId <- TextDocumentIdentifier <$> getDocUri "Desktop/simple.hs"
sendNotification TextDocumentDidOpen (DidOpenTextDocumentParams docItem)
- sendRequest (Proxy :: Proxy DocumentSymbolRequest) TextDocumentDocumentSymbol (DocumentSymbolParams docId)
+ sendRequest TextDocumentDocumentSymbol (DocumentSymbolParams docId)
skipMany loggingNotification
- response >>= liftIO . print
\ No newline at end of file
+ anyResponse >>= liftIO . print