Skip to content

Commit 9cec6be

Browse files
Second attempt to fix #417 (and fix #458 too) (#460)
* Revert "Hide lowercase modules. (#418)" This reverts commit a8458b1. * Omit lowercase modules in value completions.
1 parent fe64076 commit 9cec6be

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

src/analyze/NewCompletions.re

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -358,7 +358,11 @@ let valueCompletions = (~env: Query.queryEnv, suffix) => {
358358
Log.log(" - Completing in " ++ env.file.uri);
359359
let results = [];
360360
let results =
361-
if (isCapitalized(suffix)) {
361+
if (suffix == "" || isCapitalized(suffix)) {
362+
363+
// Get rid of lowercase modules (#417)
364+
env.exported.modules |> Hashtbl.filter_map_inplace((name, key) => isCapitalized(name) ? Some(key) : None);
365+
362366
let moduleCompletions = completionForExporteds(
363367
env.exported.modules, env.file.stamps.modules, suffix, m =>
364368
Module(m)

0 commit comments

Comments
 (0)