File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed
ghcide/src/Development/IDE/Plugin Expand file tree Collapse file tree 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
457457 IO [Either ResponseError CompletionResponseResult ]
458458 makeAction 0 _ = return []
459459 makeAction _ [] = return []
460- makeAction n ((pid, p) : rest) = do
460+ makeAction limit ((pid, p) : rest) = do
461461 pluginConfig <- getPluginConfig lf pid
462462 results <- if pluginEnabled pluginConfig plcCompletionOn
463463 then otTracedProvider pid " completions" $ p lf ideState params
464464 else return $ Right $ Completions $ List []
465465 case results of
466466 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
469469 Left err ->
470- (Left err : ) <$> makeAction n rest
470+ (Left err : ) <$> makeAction limit rest
471471
472472 case mprefix of
473473 Nothing -> return $ Right $ Completions $ List []
You can’t perform that action at this time.
0 commit comments