diff --git a/Browse.hs b/Browse.hs
index 15a0e04..f642b7b 100644
--- a/Browse.hs
+++ b/Browse.hs
@@ -20,7 +20,7 @@ browse :: String -> IO [String]
 browse mdlName = withGHCAPI (maybeNamesToStrings <$> lookupModuleInfo)
 
   where
-    lookupModuleInfo = lookupModule (mkModuleName mdlName) Nothing >>= getModuleInfo
+    lookupModuleInfo = findModule (mkModuleName mdlName) Nothing >>= getModuleInfo
     maybeNamesToStrings = maybe [] (map getOccString . modInfoExports)
 
 withGHCAPI :: Ghc a -> IO a