diff options
Diffstat (limited to 'bin/draw.hs')
| -rw-r--r-- | bin/draw.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/draw.hs b/bin/draw.hs index 89658f6..f2d5b54 100644 --- a/bin/draw.hs +++ b/bin/draw.hs @@ -73,7 +73,8 @@ main = run =<< execParser opts (parser <**> helper) (fullDesc <> progDesc "Draw phylogeny" <> header "phylogey - Bayesian phylogeny inference") parser = - Options <$> option nat (long "nthreshold" <> short 't' <> help "minimum number of variants" <> showDefault <> value 0 <> metavar "NAT") + Options + <$> option nat (long "nthreshold" <> short 't' <> help "minimum number of variants" <> showDefault <> value 0 <> metavar "NAT") <*> argument str (metavar "PROPS") <*> argument str (metavar "TREE") <*> argument str (metavar "PATH") |