From: Luke Lau <luke_lau@icloud.com>
Date: Wed, 3 Feb 2021 17:53:59 +0000 (+0000)
Subject: Merge pull request #85 from wz1000/master
X-Git-Tag: 0.13.0.0~2
X-Git-Url: https://git.lukelau.me/?p=lsp-test.git;a=commitdiff_plain;h=4e142f8f3d28cbbec21b86f5579060ecce5d03e1;hp=dea9d74e296cc9a4e94c3d35ed9f14c6b40986af

Merge pull request #85 from wz1000/master

use Text instead of String
---

diff --git a/src/Language/LSP/Test.hs b/src/Language/LSP/Test.hs
index 90000fd..62b3267 100644
--- a/src/Language/LSP/Test.hs
+++ b/src/Language/LSP/Test.hs
@@ -398,7 +398,7 @@ createDoc file languageId contents = do
       watchHits :: FileSystemWatcher -> Bool
       watchHits (FileSystemWatcher pattern kind) =
         -- If WatchKind is exlcuded, defaults to all true as per spec
-        fileMatches pattern && createHits (fromMaybe (WatchKind True True True) kind)
+        fileMatches (T.unpack pattern) && createHits (fromMaybe (WatchKind True True True) kind)
 
       fileMatches pattern = Glob.match (Glob.compile pattern) relOrAbs
         -- If the pattern is absolute then match against the absolute fp