diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2018-05-15 13:03:12 +0200 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2018-05-15 13:03:12 +0200 |
commit | 5d38dd48cc8e5349803064eb521117b3f20b3c74 (patch) | |
tree | d1e9785b40a1e5ee868b548073381c5c3f7200b5 /adjmix/Adjmix.hs | |
parent | 72dfd7bdb13e71c04604c0458582960259ec8fbf (diff) | |
download | trivmix-5d38dd48cc8e5349803064eb521117b3f20b3c74.tar trivmix-5d38dd48cc8e5349803064eb521117b3f20b3c74.tar.gz trivmix-5d38dd48cc8e5349803064eb521117b3f20b3c74.tar.bz2 trivmix-5d38dd48cc8e5349803064eb521117b3f20b3c74.tar.xz trivmix-5d38dd48cc8e5349803064eb521117b3f20b3c74.zip |
Shorten '--level' to '-l'
Diffstat (limited to 'adjmix/Adjmix.hs')
-rw-r--r-- | adjmix/Adjmix.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/adjmix/Adjmix.hs b/adjmix/Adjmix.hs index cd5f4e4..5133973 100644 --- a/adjmix/Adjmix.hs +++ b/adjmix/Adjmix.hs | |||
@@ -28,7 +28,7 @@ optionParser = do | |||
28 | , help "Base directory" | 28 | , help "Base directory" |
29 | ] | 29 | ] |
30 | levelFile <- strOption $ mconcat | 30 | levelFile <- strOption $ mconcat |
31 | [ long "level", metavar "FILENAME", showDefault | 31 | [ long "level", short 'l', metavar "FILENAME", showDefault |
32 | , value "level" | 32 | , value "level" |
33 | , help "Filename of the level file" | 33 | , help "Filename of the level file" |
34 | ] | 34 | ] |