Fix issue with imported reserved names from #214
commit017f96b52214044cdf326f6e1076e0eeee82f2c5
authorEvan Czaplicki <info@elm-lang.org>
dateSun 22 Sep 2013, 17:40 (13 years ago)
parent46b988b
compiler/Generate/JavaScript.hs+1−1
@@ -17,7 +17,7 @@ import Language.ECMAScript3.PrettyPrint
1717import Parse.Helpers (jsReserveds)
1818
1919makeSafe :: String -> String
20−makeSafe = dereserve . deprime
20+makeSafe = List.intercalate "." . map dereserve . split . deprime
2121 where
2222 deprime = map (\c -> if c == '\'' then '$' else c)
2323 dereserve x = case Set.member x jsReserveds of