on master help sign in
Expose function to get qualified JS names
ec7d38aEvan Czaplicki
src/Elm/Compiler/Module.hs+4−4
@@ -7,7 +7,7 @@ module Elm.Compiler.Module
7 , RawForJson(RawForJson), fromJson
7 , RawForJson(RawForJson), fromJson
8 , defaultImports
8 , defaultImports
9 , interfaceAliasedTypes
9 , interfaceAliasedTypes
10− , ModuleName.Canonical(..), canonicalNameToJS
10+ , ModuleName.Canonical(..), qualifiedVar
11 )
11 )
12 where
12 where
13
13
@@ -53,9 +53,9 @@ fromJson (RawForJson raw) =
53 raw
53 raw
54
54
55
55
56−canonicalNameToJS :: ModuleName.Canonical -> String
56+qualifiedVar :: ModuleName.Canonical -> String -> String
57−canonicalNameToJS =
57+qualifiedVar =
58− Gen.moduleToString
58+ Gen.qualified
59
59
60
60
61defaultImports :: [ModuleName.Raw]
61defaultImports :: [ModuleName.Raw]
src/Generate/JavaScript/Variable.hs+1−1
@@ -2,9 +2,9 @@
2module Generate.JavaScript.Variable
2module Generate.JavaScript.Variable
3 ( fresh
3 ( fresh
4 , canonical
4 , canonical
5+ , qualified
5 , define
6 , define
6 , safe
7 , safe
7− , moduleToString
8 )
8 )
9 where
9 where
10
10