Merge pull request #6650 from phadej/pr-6641

Split monolithic Init.hs module into 5 sub-modules.
haskell · Apr 4, 2020 · 26b2def · 26b2def
2 parents 3752c3e + 9bd18b6
commit 26b2def
Show file tree

Hide file tree

Showing 8 changed files with 1,501 additions and 1,308 deletions.
diff --git a/cabal-install/Distribution/Client/Init.hs b/cabal-install/Distribution/Client/Init.hs
diff --git a/cabal-install/Distribution/Client/Init/Command.hs b/cabal-install/Distribution/Client/Init/Command.hs
diff --git a/cabal-install/Distribution/Client/Init/Defaults.hs b/cabal-install/Distribution/Client/Init/Defaults.hs
@@ -0,0 +1,31 @@
+-----------------------------------------------------------------------------
+-- |
+-- Module      :  Distribution.Client.Init.Defaults
+-- Copyright   :  (c) Brent Yorgey 2009
+-- License     :  BSD-like
+--
+-- Maintainer  :  [email protected]
+-- Stability   :  provisional
+-- Portability :  portable
+--
+-- Default values to use in cabal init (if not specified in config/flags).
+--
+-----------------------------------------------------------------------------
+
+module Distribution.Client.Init.Defaults (
+    defaultCabalVersion
+  , myLibModule
+  ) where
+
+import Distribution.ModuleName
+  ( ModuleName )  -- And for the Text instance
+import qualified Distribution.ModuleName as ModuleName
+  ( fromString )
+import Distribution.Version
+  ( Version, mkVersion )
+
+defaultCabalVersion :: Version
+defaultCabalVersion = mkVersion [1,10]
+
+myLibModule :: ModuleName
+myLibModule = ModuleName.fromString "MyLib"