1
1
mirror of https://github.com/github/semantic.git synced 2024-12-15 01:51:39 +03:00

Rename name to relPath

Co-Authored-By: Rick Winfrey <rick.winfrey@gmail.com>
This commit is contained in:
joshvera 2018-11-26 19:55:51 -05:00
parent 5084eece82
commit 024da78987

View File

@ -77,9 +77,9 @@ resolvePythonModules :: ( Member (Modules address value) sig
-> Evaluator term address value m (NonEmpty ModulePath)
resolvePythonModules q = do
relRootDir <- rootDir q <$> currentModule
for (moduleNames q) $ \name -> do
x <- search relRootDir name
x <$ traceResolve name x
for (moduleNames q) $ \relPath -> do
x <- search relRootDir relPath
x <$ traceResolve relPath x
where
rootDir (QualifiedName _) ModuleInfo{..} = mempty -- overall rootDir of the Package.
rootDir (RelativeQualifiedName n _) ModuleInfo{..} = upDir numDots (takeDirectory modulePath)