Minor reformatting

src/Stack/Types/Package.hs

@@ -278,38 +278,39 @@ psVersion (PSRemote _ v _ _) = v
 
 -- | Information on a locally available package of source code.
 data LocalPackage = LocalPackage
-  { package       :: !Package
+  { package        :: !Package
      -- ^ The @Package@ info itself, after resolution with package flags, with
      -- tests and benchmarks disabled
-  , components    :: !(Set NamedComponent)
+  , components     :: !(Set NamedComponent)
     -- ^ Components to build, not including the library component.
-  , unbuildable   :: !(Set NamedComponent)
+  , unbuildable    :: !(Set NamedComponent)
     -- ^ Components explicitly requested for build, that are marked
     -- "buildable: false".
-  , wanted        :: !Bool -- FIXME Should completely drop this "wanted"
-                             -- terminology, it's unclear
+  , wanted         :: !Bool
     -- ^ Whether this package is wanted as a target.
-  , testBench     :: !(Maybe Package)
+
+    -- FIXME Should completely drop this "wanted" terminology, it's unclear.
+  , testBench      :: !(Maybe Package)
     -- ^ This stores the 'Package' with tests and benchmarks enabled, if either
     -- is asked for by the user.
-  , cabalFP     :: !(Path Abs File)
+  , cabalFP        :: !(Path Abs File)
     -- ^ Absolute path to the Cabal file.
-  , buildHaddocks :: !Bool
+  , buildHaddocks  :: !Bool
     -- ^ Is Haddock documentation being built for this package?
-  , forceDirty    :: !Bool
-  , dirtyFiles    :: !(MemoizedWith EnvConfig (Maybe (Set FilePath)))
+  , forceDirty     :: !Bool
+  , dirtyFiles     :: !(MemoizedWith EnvConfig (Maybe (Set FilePath)))
     -- ^ Nothing == not dirty, Just == dirty. Note that the Set may be empty if
     -- we forced the build to treat packages as dirty. Also, the Set may not
     -- include all modified files.
   , newBuildCaches :: !( MemoizedWith
-                             EnvConfig
-                             (Map NamedComponent (Map FilePath FileCacheInfo))
-                         )
+                           EnvConfig
+                           (Map NamedComponent (Map FilePath FileCacheInfo))
+                       )
     -- ^ current state of the files
   , componentFiles :: !( MemoizedWith
-                             EnvConfig
-                             (Map NamedComponent (Set (Path Abs File)))
-                         )
+                           EnvConfig
+                           (Map NamedComponent (Set (Path Abs File)))
+                       )
     -- ^ all files used by this package
   }
   deriving Show