Skip to content

Commit 138bfb2

Browse files
committed
fix build
1 parent 72221ab commit 138bfb2

File tree

1 file changed

+2
-6
lines changed

1 file changed

+2
-6
lines changed

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

Lines changed: 2 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -27,8 +27,7 @@ module Test.Hls
2727
waitForBuildQueue,
2828
waitForTypecheck,
2929
waitForAction,
30-
sendConfigurationChanged,
31-
getLastBuildKeys)
30+
sendConfigurationChanged)
3231
where
3332

3433
import Control.Applicative.Combinators
@@ -49,7 +48,7 @@ import Development.IDE (IdeState, noLogging)
4948
import Development.IDE.Graph (ShakeOptions (shakeThreads))
5049
import Development.IDE.Main
5150
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),
5352
WaitForIdeRuleResult (ideResultSuccess))
5453
import Development.IDE.Types.Options
5554
import GHC.IO.Handle
@@ -241,9 +240,6 @@ waitForAction key TextDocumentIdentifier{_uri} =
241240
waitForTypecheck :: TextDocumentIdentifier -> Session (Either ResponseError Bool)
242241
waitForTypecheck tid = fmap ideResultSuccess <$> waitForAction "typecheck" tid
243242

244-
getLastBuildKeys :: Session (Either ResponseError [T.Text])
245-
getLastBuildKeys = callTestPlugin GetLastBuildKeys
246-
247243
sendConfigurationChanged :: Value -> Session ()
248244
sendConfigurationChanged config =
249245
sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams config)

0 commit comments

Comments
 (0)