From 8ec978161d50e476e327b59bdf1a2d5e57705609 Mon Sep 17 00:00:00 2001
From: "simonpj@microsoft.com" <unknown>
Date: Fri, 21 Aug 2009 10:08:26 +0000
Subject: [PATCH] Another tiny tidy-up to RnPat

---
 compiler/rename/RnPat.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/rename/RnPat.lhs b/compiler/rename/RnPat.lhs
index b49e1cd..6ab4890 100644
--- a/compiler/rename/RnPat.lhs
+++ b/compiler/rename/RnPat.lhs
@@ -481,7 +481,7 @@ rnHsRecFields1 ctxt mk_arg (HsRecFields { rec_flds = flds, rec_dotdot = dotdot }
                  extras = [ HsRecField
                               { hsRecFieldId = L loc f
                               , hsRecFieldArg = name_to_arg (L loc f)
-                              , hsRecPun = True }
+                              , hsRecPun = False }
                           | f <- absent_flds ]
 
            ; return (flds ++ extras) }
-- 
1.7.10.4