File tree 1 file changed +4
-4
lines changed
ghcide/src/Development/IDE/Plugin
1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -457,17 +457,17 @@ makeCompletions sps lf ideState params@(CompletionParams (TextDocumentIdentifier
457
457
IO [Either ResponseError CompletionResponseResult ]
458
458
makeAction 0 _ = return []
459
459
makeAction _ [] = return []
460
- makeAction n ((pid, p) : rest) = do
460
+ makeAction limit ((pid, p) : rest) = do
461
461
pluginConfig <- getPluginConfig lf pid
462
462
results <- if pluginEnabled pluginConfig plcCompletionOn
463
463
then otTracedProvider pid " completions" $ p lf ideState params
464
464
else return $ Right $ Completions $ List []
465
465
case results of
466
466
Right resp -> do
467
- let (n ', results') = consumeCompletionResponse n resp
468
- (Right results' : ) <$> makeAction n ' rest
467
+ let (limit ', results') = consumeCompletionResponse limit resp
468
+ (Right results' : ) <$> makeAction limit ' rest
469
469
Left err ->
470
- (Left err : ) <$> makeAction n rest
470
+ (Left err : ) <$> makeAction limit rest
471
471
472
472
case mprefix of
473
473
Nothing -> return $ Right $ Completions $ List []
You can’t perform that action at this time.
0 commit comments