Fixes a race condition with ProgressListener.End (ionide#1183)

nojaf · Nov 3, 2023 · 8e69565 · 8e69565
1 parent 56e6076
commit 8e69565
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/FsAutoComplete/LspServers/FSharpLspClient.fs b/src/FsAutoComplete/LspServers/FSharpLspClient.fs
@@ -163,10 +163,10 @@ type ServerProgressReport(lspClient: FSharpLspClient, ?token: ProgressToken) =
     cancellableTask {
       use! __ = fun ct -> locker.LockAsync(ct)
       let stillNeedsToSend = canReportProgress && not endSent
-      endSent <- true
 
       if stillNeedsToSend then
         do! lspClient.Progress(x.Token, WorkDoneProgressEnd.Create(?message = message))
+        endSent <- true
     }
 
   interface IAsyncDisposable with