@@ -27,8 +27,7 @@ module Test.Hls
27
27
waitForBuildQueue ,
28
28
waitForTypecheck ,
29
29
waitForAction ,
30
- sendConfigurationChanged ,
31
- getLastBuildKeys )
30
+ sendConfigurationChanged )
32
31
where
33
32
34
33
import Control.Applicative.Combinators
@@ -49,7 +48,7 @@ import Development.IDE (IdeState, noLogging)
49
48
import Development.IDE.Graph (ShakeOptions (shakeThreads ))
50
49
import Development.IDE.Main
51
50
import qualified Development.IDE.Main as Ghcide
52
- import Development.IDE.Plugin.Test (TestRequest (GetLastBuildKeys , WaitForIdeRule , WaitForShakeQueue ),
51
+ import Development.IDE.Plugin.Test (TestRequest (WaitForIdeRule , WaitForShakeQueue ),
53
52
WaitForIdeRuleResult (ideResultSuccess ))
54
53
import Development.IDE.Types.Options
55
54
import GHC.IO.Handle
@@ -241,9 +240,6 @@ waitForAction key TextDocumentIdentifier{_uri} =
241
240
waitForTypecheck :: TextDocumentIdentifier -> Session (Either ResponseError Bool )
242
241
waitForTypecheck tid = fmap ideResultSuccess <$> waitForAction " typecheck" tid
243
242
244
- getLastBuildKeys :: Session (Either ResponseError [T. Text ])
245
- getLastBuildKeys = callTestPlugin GetLastBuildKeys
246
-
247
243
sendConfigurationChanged :: Value -> Session ()
248
244
sendConfigurationChanged config =
249
245
sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams config)
0 commit comments