git.iko.soy/elk
on master help sign in
Fix tab completion in the REPL
091fa6bEvan Czaplicki
ui/terminal/src/Repl.hs+1−1
compare with master
unifiedsplit
@@ -310,7 +310,7 @@ addMatch :: String -> Bool -> N.Name -> v -> [Repl.Completion] -> [Repl.Completi
310addMatch string isFinished name _ completions =
310addMatch string isFinished name _ completions =
311 let suggestion = N.toString name in
311 let suggestion = N.toString name in
312 if List.isPrefixOf string suggestion then
312 if List.isPrefixOf string suggestion then
313− Repl.Completion (drop (length string) suggestion) suggestion isFinished : completions
313+ Repl.Completion suggestion suggestion isFinished : completions
314 else
314 else
315 completions
315 completions
316
316