X-Git-Url: https://git.lukelau.me/?a=blobdiff_plain;f=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FDecoding.hs;fp=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FDecoding.hs;h=337dee371db5ae67cbe3f898e1f8401a4d05609a;hb=e7a888628391e9b245c61e1a5a01c4965ab0396f;hp=43810bbe7c28fa95e47a7795d65190a8598fc42f;hpb=8ed6e0d9c9f0196e7058a0bd82b91d152e19ae42;p=lsp-test.git

diff --git a/src/Language/Haskell/LSP/Test/Decoding.hs b/src/Language/Haskell/LSP/Test/Decoding.hs
index 43810bb..337dee3 100644
--- a/src/Language/Haskell/LSP/Test/Decoding.hs
+++ b/src/Language/Haskell/LSP/Test/Decoding.hs
@@ -134,7 +134,6 @@ decodeFromServerMsg reqMap bytes =
         WindowProgressStart            -> NotProgressStart $ fromJust $ decode bytes
         WindowProgressReport           -> NotProgressReport $ fromJust $ decode bytes
         WindowProgressDone             -> NotProgressDone $ fromJust $ decode bytes
-        WindowProgressCancel           -> NotProgressCancel $ fromJust $ decode bytes
         TelemetryEvent                 -> NotTelemetry $ fromJust $ decode bytes
         WindowShowMessageRequest       -> ReqShowMessage $ fromJust $ decode bytes
         ClientRegisterCapability       -> ReqRegisterCapability $ fromJust $ decode bytes