diff --git a/Cabal/Distribution/Package.hs b/Cabal/Distribution/Package.hs
index bc37caefb0dd51bbaed7bcc8bb3f16bb5f28817e..425ee7bb4ddc333116b4fab239f737b730a65c23 100644
--- a/Cabal/Distribution/Package.hs
+++ b/Cabal/Distribution/Package.hs
@@ -145,8 +145,7 @@ instance NFData PackageIdentifier where
 -- module identities, e.g., when writing out reexported modules in
 -- the 'InstalledPackageInfo'.
 data Module =
-    Module { moduleUnitId :: UnitId,
-             moduleName :: ModuleName }
+      Module UnitId ModuleName
     deriving (Generic, Read, Show, Eq, Ord, Typeable, Data)
 
 instance Binary Module