From e420bf25bdc367b978456405f485c4a5c5499905 Mon Sep 17 00:00:00 2001
From: Phil de Joux <philderbeast@gmail.com>
Date: Wed, 13 Mar 2024 12:45:38 -0400
Subject: [PATCH] Fix whitespace in *.hs sources

---
 Cabal-described/src/Distribution/Described.hs                   | 2 +-
 Cabal-described/src/Distribution/Utils/CharSet.hs               | 2 +-
 Cabal-tests/tests/UnitTests/Distribution/Simple/Program/GHC.hs  | 2 +-
 bootstrap/src/Main.hs                                           | 2 +-
 cabal-install-solver/src/Distribution/Solver/Modular/Message.hs | 2 +-
 5 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/Cabal-described/src/Distribution/Described.hs b/Cabal-described/src/Distribution/Described.hs
index b158fe02a77..3bfd8c2e3a4 100644
--- a/Cabal-described/src/Distribution/Described.hs
+++ b/Cabal-described/src/Distribution/Described.hs
@@ -591,4 +591,4 @@ instance Described CompatLicenseFile where
     describe _ = describe ([] :: [Token])
 
 instance Described CompatFilePath where
-    describe _ = describe ([] :: [Token]) 
\ No newline at end of file
+    describe _ = describe ([] :: [Token])
diff --git a/Cabal-described/src/Distribution/Utils/CharSet.hs b/Cabal-described/src/Distribution/Utils/CharSet.hs
index 3cb9ba500a8..9243615c7fa 100644
--- a/Cabal-described/src/Distribution/Utils/CharSet.hs
+++ b/Cabal-described/src/Distribution/Utils/CharSet.hs
@@ -244,4 +244,4 @@ upper = foldl' (flip insert) empty [ c | c <- [ minBound .. maxBound ], isUpper
 -- $setup
 -- Use -XOverloadedStrings to avoid the error: Couldn't match type ‘[Char]’ with ‘CharSet’
 -- >>> :set -XOverloadedStrings
--- >>> import Prelude (length)
\ No newline at end of file
+-- >>> import Prelude (length)
diff --git a/Cabal-tests/tests/UnitTests/Distribution/Simple/Program/GHC.hs b/Cabal-tests/tests/UnitTests/Distribution/Simple/Program/GHC.hs
index c399118f893..9fc9b3409e3 100644
--- a/Cabal-tests/tests/UnitTests/Distribution/Simple/Program/GHC.hs
+++ b/Cabal-tests/tests/UnitTests/Distribution/Simple/Program/GHC.hs
@@ -190,4 +190,4 @@ options_9_0_all =
 options_9_0_affects :: [String]
 options_9_0_affects =
     [ "-fcmm-static-pred"
-    ]
\ No newline at end of file
+    ]
diff --git a/bootstrap/src/Main.hs b/bootstrap/src/Main.hs
index 8f06acba2ce..04e3bd59dd1 100644
--- a/bootstrap/src/Main.hs
+++ b/bootstrap/src/Main.hs
@@ -113,7 +113,7 @@ main2 meta plan = do
                 case P.uPkgSrc unit of
                       Just (P.RepoTarballPackage (P.RepoSecure _uri)) ->
                         return Hackage
-                      Just (P.LocalUnpackedPackage _path) -> 
+                      Just (P.LocalUnpackedPackage _path) ->
                         return Local
                       pkgsrc ->
                         die $ "package source not supported: " ++ show pkgsrc
diff --git a/cabal-install-solver/src/Distribution/Solver/Modular/Message.hs b/cabal-install-solver/src/Distribution/Solver/Modular/Message.hs
index 11fa7ca874d..810e5121002 100644
--- a/cabal-install-solver/src/Distribution/Solver/Modular/Message.hs
+++ b/cabal-install-solver/src/Distribution/Solver/Modular/Message.hs
@@ -357,4 +357,4 @@ showConflictingDep (ConflictingDep dr (PkgComponent qpn comp) ci) =
 -- >>> let v0 = POption (I (mkVersion [0]) InRepo) Nothing
 -- >>> let v1 = POption (I (mkVersion [1]) InRepo) Nothing
 -- >>> let i0 = POption (I (mkVersion [0]) (Inst $ mkUnitId "foo-bar-0-inplace")) Nothing
--- >>> let i1 = POption (I (mkVersion [1]) (Inst $ mkUnitId "foo-bar-1-inplace")) Nothing
\ No newline at end of file
+-- >>> let i1 = POption (I (mkVersion [1]) (Inst $ mkUnitId "foo-bar-1-inplace")) Nothing