@@ -27,8 +27,7 @@ module Test.Hls
2727 waitForBuildQueue ,
2828 waitForTypecheck ,
2929 waitForAction ,
30- sendConfigurationChanged ,
31- getLastBuildKeys )
30+ sendConfigurationChanged )
3231where
3332
3433import Control.Applicative.Combinators
@@ -49,7 +48,7 @@ import Development.IDE (IdeState, noLogging)
4948import Development.IDE.Graph (ShakeOptions (shakeThreads ))
5049import Development.IDE.Main
5150import 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 ),
5352 WaitForIdeRuleResult (ideResultSuccess ))
5453import Development.IDE.Types.Options
5554import GHC.IO.Handle
@@ -241,9 +240,6 @@ waitForAction key TextDocumentIdentifier{_uri} =
241240waitForTypecheck :: TextDocumentIdentifier -> Session (Either ResponseError Bool )
242241waitForTypecheck tid = fmap ideResultSuccess <$> waitForAction " typecheck" tid
243242
244- getLastBuildKeys :: Session (Either ResponseError [T. Text ])
245- getLastBuildKeys = callTestPlugin GetLastBuildKeys
246-
247243sendConfigurationChanged :: Value -> Session ()
248244sendConfigurationChanged config =
249245 sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams config)
0 commit comments