fix compiler warning
This commit is contained in:
parent
b9b48273d7
commit
7a8e98158f
@ -28,6 +28,7 @@ main = do
|
||||
data ArgConfig = ArgConfig {environment :: String, port :: Int}
|
||||
deriving (Show, Data, Typeable)
|
||||
|
||||
argConfig :: ArgConfig
|
||||
argConfig = ArgConfig{ environment = def
|
||||
&= help ("application environment, one of: " ++ (foldl1 (\a b -> a ++ ", " ++ b) environments))
|
||||
&= typ "ENVIRONMENT"
|
||||
|
||||
Loading…
Reference in New Issue
Block a user