X-Git-Url: http://git.lukelau.me/?p=lsp-test.git;a=blobdiff_plain;f=src%2FLanguage%2FHaskell%2FLSP%2FTest.hs;h=047e35b0ac715d765eeb4f1c02f11a63b015426e;hp=4f82498c732ad64263070d2e1d7f7d420dc4caa4;hb=1f39d55cc3fb2e840a115c12d7da3935b9529361;hpb=d25de2bf28d472df5d1d3e050090d243247dab1b diff --git a/src/Language/Haskell/LSP/Test.hs b/src/Language/Haskell/LSP/Test.hs index 4f82498..047e35b 100644 --- a/src/Language/Haskell/LSP/Test.hs +++ b/src/Language/Haskell/LSP/Test.hs @@ -157,7 +157,6 @@ processTextChanges (ReqApplyWorkspaceEdit r) = do params = DidChangeTextDocumentParams docId (List changeEvents) newVFS <- liftIO $ changeVFS oldVFS (fmClientDidChangeTextDocumentNotification params) modify (\s -> s { vfs = newVFS }) - liftIO $ print newVFS return params applyTextEdit uri edits = applyTextDocumentEdit (TextDocumentEdit (VersionedTextDocumentIdentifier uri 0) edits)