Use the local package name for any imported
commita44041b723267a4518b24281e1e4189f6665a454
authorEvan Czaplicki <info@elm-lang.org>
dateFri 19 Feb 2016, 13:16 (11 years ago)
parent31e5896
src/Canonicalize/Variable.hs+4−1
@@ -28,8 +28,11 @@ variable region env var =
2828 case toVarName var of
2929 Right (name, varName) | ModuleName.isNative name ->
3030 let
31+ localPkg =
32+ ModuleName._package (Env._home env)
33+
3134 moduleName =
32− ModuleName.Canonical Pkg.dummyName name
35+ ModuleName.Canonical localPkg name
3336 in
3437 Result.var (Var.Canonical (Var.Module moduleName) varName)
3538