mirror of
https://github.com/commercialhaskell/stackage.git
synced 2026-03-11 03:06:35 +01:00
Fix --ghc-options arg
This commit is contained in:
parent
048106c593
commit
69b30063ff
@ -3,11 +3,12 @@
|
|||||||
module Main where
|
module Main where
|
||||||
|
|
||||||
import Control.Monad
|
import Control.Monad
|
||||||
|
import Data.Maybe
|
||||||
import Data.Monoid
|
import Data.Monoid
|
||||||
import Data.String (fromString)
|
import Data.String (fromString)
|
||||||
import Data.Version
|
import Data.Version
|
||||||
import Options.Applicative
|
|
||||||
import Filesystem.Path.CurrentOS (decodeString)
|
import Filesystem.Path.CurrentOS (decodeString)
|
||||||
|
import Options.Applicative
|
||||||
import Paths_stackage (version)
|
import Paths_stackage (version)
|
||||||
import Stackage.CompleteBuild
|
import Stackage.CompleteBuild
|
||||||
import Stackage.InstallBuild
|
import Stackage.InstallBuild
|
||||||
@ -91,12 +92,11 @@ main =
|
|||||||
switch
|
switch
|
||||||
(long "skip-check" <>
|
(long "skip-check" <>
|
||||||
help "Skip the check phase, and pass --allow-newer to cabal configure") <*>
|
help "Skip the check phase, and pass --allow-newer to cabal configure") <*>
|
||||||
option
|
fmap (fromMaybe "")
|
||||||
auto
|
(optional (strOption
|
||||||
(long "ghc-options" <>
|
(long "ghc-options" <>
|
||||||
metavar "OPTIONS" <>
|
showDefault <>
|
||||||
showDefault <>
|
help "GHC options")))
|
||||||
help "GHC options")
|
|
||||||
|
|
||||||
nightlyUploadFlags = fromString <$> strArgument
|
nightlyUploadFlags = fromString <$> strArgument
|
||||||
(metavar "DATE" <>
|
(metavar "DATE" <>
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user