it "keeps track" $ runSession serverExe fullCaps "test/data" $ do
loggingNotification -- initialized log message
- createDoc "register" "haskell" ""
+ createDoc ".register" "haskell" ""
message :: Session RegisterCapabilityRequest
doc <- createDoc "Foo.watch" "haskell" ""
]
-- now unregister it by sending a specific createDoc
- createDoc "unregister" "haskell" ""
+ createDoc ".unregister" "haskell" ""
message :: Session UnregisterCapabilityRequest
createDoc "Bar.watch" "haskell" ""
loggingNotification -- initialized log message
- createDoc "register.abs" "haskell" ""
+ createDoc ".register.abs" "haskell" ""
message :: Session RegisterCapabilityRequest
doc <- createDoc (curDir </> "Foo.watch") "haskell" ""
liftIO $ msg ^. params . LSP.message `shouldBe` "got workspace/didChangeWatchedFiles"
-- now unregister it by sending a specific createDoc
- createDoc "unregister.abs" "haskell" ""
+ createDoc ".unregister.abs" "haskell" ""
message :: Session UnregisterCapabilityRequest
createDoc (curDir </> "Bar.watch") "haskell" ""