@@ -214,8 +214,10 @@ make outputDir opts ms = do
214 regrouped <- lift . liftError . stringifyErrorStack True . createBindingGroups moduleName' . collapseBindingGroups $ elaborated
214 regrouped <- lift . liftError . stringifyErrorStack True . createBindingGroups moduleName' . collapseBindingGroups $ elaborated
216 let mod' = Module moduleName' regrouped exps
216 let mod' = Module moduleName' regrouped exps
217+ let [renamed] = renameInModules [mod']
217− js <- prettyPrintJS <$> moduleToJs CommonJS opts mod' env'
219+ js <- prettyPrintJS <$> moduleToJs CommonJS opts renamed env'
218− let exts = moduleToPs mod' env'
220+ let exts = moduleToPs renamed env'
220 lift $ writeTextFile jsFile js
222 lift $ writeTextFile jsFile js
221 lift $ writeTextFile externsFile exts
223 lift $ writeTextFile externsFile exts