[fix bug that caused record constructors defined in the current module to not be added to the local FieldMap
John Meacham <john@repetae.net>**20090807074606
 Ignore-this: 1d4a7b70315bc922a3f6f1c86a276a45
] hunk ./src/FrontEnd/Rename.hs 533
-        hsName' <- rename hsName  -- do I need to change this name?
+        hsName' <- rename hsName
hunk ./src/FrontEnd/Rename.hs 536
-        buildRecConstr fls (hsName':: HsName) (hsFieldUpdates'::[HsFieldUpdate]) -- HsRecConstr hsName' hsFieldUpdates')
+        buildRecConstr fls hsName' (hsFieldUpdates'::[HsFieldUpdate])
hunk ./src/FrontEnd/Tc/Module.hs 119
-    mserrs <- mapM (processModule (hoFieldMap htc)) ms
+    let nfm = buildFieldMap ms `mappend` hoFieldMap htc
+    mserrs <- mapM (processModule nfm) ms