diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2018-05-15 13:00:35 +0200 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2018-05-15 13:00:35 +0200 |
commit | 72dfd7bdb13e71c04604c0458582960259ec8fbf (patch) | |
tree | 97d9737f5f710352ffbc609c4da0f5fc6d8b4a03 | |
parent | 86ce943d5a49982246ab83e4acc72ffb7c22567c (diff) | |
download | trivmix-72dfd7bdb13e71c04604c0458582960259ec8fbf.tar trivmix-72dfd7bdb13e71c04604c0458582960259ec8fbf.tar.gz trivmix-72dfd7bdb13e71c04604c0458582960259ec8fbf.tar.bz2 trivmix-72dfd7bdb13e71c04604c0458582960259ec8fbf.tar.xz trivmix-72dfd7bdb13e71c04604c0458582960259ec8fbf.zip |
…
-rw-r--r-- | trivmix/Trivmix.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/trivmix/Trivmix.hs b/trivmix/Trivmix.hs index 4d7c6f7..7743246 100644 --- a/trivmix/Trivmix.hs +++ b/trivmix/Trivmix.hs | |||
@@ -83,7 +83,7 @@ optionParser = Options | |||
83 | <> value def | 83 | <> value def |
84 | <> showDefault | 84 | <> showDefault |
85 | ) | 85 | ) |
86 | <*> option auto ( long "balance" | 86 | <*> option auto ( long "initial-balance" |
87 | <> metavar "BALANCE" | 87 | <> metavar "BALANCE" |
88 | <> help "Initial value for balance" | 88 | <> help "Initial value for balance" |
89 | <> value ($$(refineTH 1.0) :: Balance) | 89 | <> value ($$(refineTH 1.0) :: Balance) |