diff --git a/ghcide/src/Development/IDE/Plugin/Completions/Logic.hs b/ghcide/src/Development/IDE/Plugin/Completions/Logic.hs index 06d0c4b028..41df57b60c 100644 --- a/ghcide/src/Development/IDE/Plugin/Completions/Logic.hs +++ b/ghcide/src/Development/IDE/Plugin/Completions/Logic.hs @@ -564,7 +564,7 @@ getCompletions plId ideOpts CC {allModNamesAsNS, unqualCompls, qualCompls, impor filtListWithSnippet f list suffix = [ toggleSnippets caps withSnippets (f label (snippet <> suffix)) | (snippet, label) <- list - , Fuzzy.test fullPrefix label + , Fuzzy.test (T.toUpper fullPrefix) label ] filtImportCompls = filtListWith (mkImportCompl enteredQual) importableModules