Cosmetic fixes

haskell · Jun 2, 2020 · 62fffd9 · 62fffd9
1 parent f45c305
commit 62fffd9
Show file tree

Hide file tree

Showing 6 changed files with 9 additions and 9 deletions.
diff --git a/Cabal/Distribution/Simple/BuildTarget.hs b/Cabal/Distribution/Simple/BuildTarget.hs
@@ -66,7 +66,7 @@ import System.Directory ( doesFileExist, doesDirectoryExist )
 import qualified Data.Map as Map
 
 -- | Take a list of 'String' build targets, and parse and validate them
--- into actual 'TargetInfo's to be built/registered/whatever.
+-- into actual 'TargetInfo's to be built\/registered\/whatever.
 readTargetInfos :: Verbosity -> PackageDescription -> LocalBuildInfo -> [String] -> IO [TargetInfo]
 readTargetInfos verbosity pkg_descr lbi args = do
     build_targets <- readBuildTargets verbosity pkg_descr args

diff --git a/cabal-install/Distribution/Client/CmdShowBuildInfo.hs b/cabal-install/Distribution/Client/CmdShowBuildInfo.hs
@@ -219,7 +219,7 @@ showInfo fileOutput verbosity baseCtx buildCtx lock pkgs targetUnitId =
       -- Check cabal version is correct
       (cabalVersion, _, _) <- getSetupMethod verbosity scriptOptions
                                             (elabPkgDescription pkg) buildType'
-      when (cabalVersion < mkVersion [3, 0, 0,0])
+      when (cabalVersion < mkVersion [3, 0, 0, 0])
         ( die' verbosity $ "Only a Cabal version >= 3.0.0.0 is supported for this command.\n"
               ++ "Found version: " ++ display cabalVersion ++ "\n"
               ++ "For component: " ++ display targetUnitId
@@ -318,8 +318,8 @@ reportTargetProblems verbosity =
 
 renderTargetProblem :: TargetProblem -> String
 renderTargetProblem (TargetProblemCommon problem) =
-    renderTargetProblemCommon "build" problem
+    renderTargetProblemCommon "show-build-info" problem
 renderTargetProblem (TargetProblemNoneEnabled targetSelector targets) =
-    renderTargetProblemNoneEnabled "build" targetSelector targets
+    renderTargetProblemNoneEnabled "show-build-info" targetSelector targets
 renderTargetProblem(TargetProblemNoTargets targetSelector) =
-    renderTargetProblemNoTargets "build" targetSelector
+    renderTargetProblemNoTargets "show-build-info" targetSelector
diff --git a/cabal-testsuite/PackageTests/ShowBuildInfo/A/cabal.project b/cabal-testsuite/PackageTests/ShowBuildInfo/A/cabal.project
@@ -1 +1 @@
-packages: .
+packages: .
diff --git a/cabal-testsuite/PackageTests/ShowBuildInfo/B/src/A.hs b/cabal-testsuite/PackageTests/ShowBuildInfo/B/src/A.hs
@@ -1,4 +1,4 @@
 module A where
 
 foo :: Int -> Int
-foo = id
+foo = id
diff --git a/cabal-testsuite/PackageTests/ShowBuildInfo/Complex/cabal.project b/cabal-testsuite/PackageTests/ShowBuildInfo/Complex/cabal.project
@@ -1 +1 @@
-packages: .
+packages: .
diff --git a/cabal-testsuite/PackageTests/ShowBuildInfo/Complex/test/Main.hs b/cabal-testsuite/PackageTests/ShowBuildInfo/Complex/test/Main.hs
@@ -1 +1 @@
-main = return ()
+main = return ()