From: Luke Lau <luke_lau@icloud.com>
Date: Fri, 15 May 2020 13:16:15 +0000 (+0100)
Subject: Make URL absolute in workspace/didChangeWatchedFile
X-Git-Tag: 0.11.0.1
X-Git-Url: http://git.lukelau.me/?p=lsp-test.git;a=commitdiff_plain;h=a7fd35b1582f9816d8caa90a7b2e3aa765fb0446

Make URL absolute in workspace/didChangeWatchedFile
---

diff --git a/lsp-test.cabal b/lsp-test.cabal
index e682eb5..1fc743a 100644
--- a/lsp-test.cabal
+++ b/lsp-test.cabal
@@ -1,5 +1,5 @@
 name:                lsp-test
-version:             0.11.0.0
+version:             0.11.0.1
 synopsis:            Functional test framework for LSP servers.
 description:
   A test framework for writing tests against
diff --git a/src/Language/Haskell/LSP/Test.hs b/src/Language/Haskell/LSP/Test.hs
index 761151e..81bdc8a 100644
--- a/src/Language/Haskell/LSP/Test.hs
+++ b/src/Language/Haskell/LSP/Test.hs
@@ -399,7 +399,7 @@ createDoc file languageId contents = do
 
   when shouldSend $
     sendNotification WorkspaceDidChangeWatchedFiles $ DidChangeWatchedFilesParams $
-      List [ FileEvent (filePathToUri file) FcCreated ]
+      List [ FileEvent (filePathToUri (rootDir </> file)) FcCreated ]
   openDoc' file languageId contents
 
 -- | Opens a text document that /exists on disk/, and sends a