X-Git-Url: https://git.lukelau.me/?p=lsp-test.git;a=blobdiff_plain;f=test%2FTest.hs;h=9527af42b1dd20a8636a310b7fb9fcf978ae5487;hp=60d3a38d0c9ab9016dfa2ba90359020bffc78383;hb=b1910277907e46b9e9f051bc97134a1c33a52f83;hpb=aa0ac8a0a985651741e11efc3af3973db88cf80f

diff --git a/test/Test.hs b/test/Test.hs
index 60d3a38..9527af4 100644
--- a/test/Test.hs
+++ b/test/Test.hs
@@ -53,7 +53,7 @@ main = findServer >>= \serverExe -> hspec $ do
                     -- won't receive a request - will timeout
                     -- incoming logging requests shouldn't increase the
                     -- timeout
-                    withTimeout 5 $ skipManyTill anyMessage (message SWorkspaceApplyEdit) :: Session ApplyWorkspaceEditRequest
+                    withTimeout 5 $ skipManyTill anyMessage (message SWorkspaceApplyEdit)
           -- wait just a bit longer than 5 seconds so we have time
           -- to open the document
           in timeout 6000000 sesh `shouldThrow` anySessionException