From 69b30063ff55943f5d9e757719ad6b7bbd783d14 Mon Sep 17 00:00:00 2001
From: Chris Done <chrisdone@gmail.com>
Date: Tue, 17 Feb 2015 20:09:26 +0100
Subject: [PATCH] Fix --ghc-options arg

---
 app/stackage.hs | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/app/stackage.hs b/app/stackage.hs
index ab33c463..15ea5902 100644
--- a/app/stackage.hs
+++ b/app/stackage.hs
@@ -3,11 +3,12 @@
 module Main where
 
 import Control.Monad
+import Data.Maybe
 import Data.Monoid
 import Data.String (fromString)
 import Data.Version
-import Options.Applicative
 import Filesystem.Path.CurrentOS (decodeString)
+import Options.Applicative
 import Paths_stackage (version)
 import Stackage.CompleteBuild
 import Stackage.InstallBuild
@@ -91,12 +92,11 @@ main =
         switch
             (long "skip-check" <>
              help "Skip the check phase, and pass --allow-newer to cabal configure") <*>
-        option
-            auto
-            (long "ghc-options" <>
-             metavar "OPTIONS" <>
-             showDefault <>
-             help "GHC options")
+        fmap (fromMaybe "")
+             (optional (strOption
+                               (long "ghc-options" <>
+                                showDefault <>
+                                help "GHC options")))
 
     nightlyUploadFlags = fromString <$> strArgument
         (metavar "DATE" <>