From 8460d9a2138ceb0ec45e70f55d20c0073b078621 Mon Sep 17 00:00:00 2001
From: Justin Bedo <cu@cua0.org>
Date: Wed, 5 Oct 2022 17:15:45 +1100
Subject: fix optional string parser

---
 src/scrape.hs | 14 ++++++--------
 1 file changed, 6 insertions(+), 8 deletions(-)

diff --git a/src/scrape.hs b/src/scrape.hs
index e877a9c..4b10fbd 100644
--- a/src/scrape.hs
+++ b/src/scrape.hs
@@ -50,14 +50,12 @@ main = configured =<< execParser opts
                 <> showDefault
                 <> value 0.1
             )
-          <*> option
-            auto
-            ( long "extra"
-                <> short 'e'
-                <> metavar "PATH"
-                <> help "path to JSON map between URNs and uniprot ids to supplement MaveDB URN query"
-                <> value Nothing
-            )
+          <*> optional (strOption
+          ( long "extra"
+              <> short 'e'
+              <> metavar "PATH"
+              <> help "path to JSON map between URNs and uniprot ids to supplement MaveDB URN query"
+          ))
 
     opts =
       info
-- 
cgit v1.2.3