Skip to content
This repository was archived by the owner on Oct 7, 2020. It is now read-only.

Commit 6d9dff9

Browse files
committed
Remove module lookup, since it can never be a module
1 parent aecfa5c commit 6d9dff9

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/Haskell/Ide/Engine/Plugin/HieExtras.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -550,7 +550,7 @@ getModule df n = do
550550
-- Sum Types can also be searched.
551551
findTypeDef :: Uri -> Position -> IdeDeferM (IdeResult [Location])
552552
findTypeDef uri pos = pluginGetFile "findTypeDef: " uri $ \file ->
553-
withCachedInfo
553+
ifCachedInfo
554554
file
555555
(IdeResultOk []) -- Default result
556556
(\info -> do
@@ -577,7 +577,7 @@ findTypeDef uri pos = pluginGetFile "findTypeDef: " uri $ \file ->
577577
case nameSrcSpan (getName tyCon) of
578578
UnhelpfulSpan _ -> throwError ()
579579
realSpan -> return realSpan
580-
580+
581581
liftMaybe :: Monad m => Maybe a -> ExceptT () m a
582582
liftMaybe val = liftEither $ case val of
583583
Nothing -> Left ()

0 commit comments

Comments
 (0)