From 78be65872387ceaa32678f0aa76dbb187cafcc63 Mon Sep 17 00:00:00 2001
From: Justin Bedo <cu@cua0.org>
Date: Fri, 7 Mar 2025 23:06:15 +1100
Subject: update to latest ppl

---
 bin/draw.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'bin/draw.hs')

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")
-- 
cgit v1.2.3