Commit 121be952 authored by Edward Tjörnhammar's avatar Edward Tjörnhammar

catMaybes, explicitly use ClassyPrelude

parent 192368d9
...@@ -141,7 +141,7 @@ getTrueModuleName name = do ...@@ -141,7 +141,7 @@ getTrueModuleName name = do
onlyImportDecl _ = Nothing onlyImportDecl _ = Nothing
-- Get all imports that we use. -- Get all imports that we use.
imports <- catMaybes <$> map onlyImportDecl <$> getContext imports <- ClassyPrelude.catMaybes <$> map onlyImportDecl <$> getContext
-- Find the ones that have a qualified name attached. -- Find the ones that have a qualified name attached.
-- If this name isn't one of them, it already is the true name. -- If this name isn't one of them, it already is the true name.
...@@ -178,7 +178,7 @@ completionType line loc target ...@@ -178,7 +178,7 @@ completionType line loc target
= Empty = Empty
-- When in a string, complete filenames. -- When in a string, complete filenames.
| cursorInString line loc | cursorInString line loc
= FilePath (getStringTarget lineUpToCursor) (getStringTarget lineUpToCursor) = FilePath (getStringTarget lineUpToCursor) (getStringTarget lineUpToCursor)
-- Complete module names in imports and elsewhere. -- Complete module names in imports and elsewhere.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment