use Null as dummy message in waitForDiagnosticsFromSourceWithTimeout

Author: kokobd

hls-test-utils/src/Test/Hls/Util.hs

@@ -320,7 +320,7 @@ waitForDiagnosticsFromSourceWithTimeout timeout document source = do
         -- Send a dummy message to provoke a response from the server.
         -- This guarantees that we have at least one message to
         -- process, so message won't block or timeout.
-    testId <- Test.sendRequest (SCustomMethod "test") (A.toJSON GetFilesOfInterest)
+    testId <- Test.sendRequest (SCustomMethod "test") A.Null
     handleMessages testId
   where
     matches :: Diagnostic -> Bool