Add test for document change tracking

[opengl.git] / src / Language / Haskell / LSP / Test.hs

diff --git a/src/Language/Haskell/LSP/Test.hs b/src/Language/Haskell/LSP/Test.hs
index 4f82498c732ad64263070d2e1d7f7d420dc4caa4..047e35b0ac715d765eeb4f1c02f11a63b015426e 100644 (file)
--- 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)