update command line options

agora-scripts/ScriptExport/Options.hs

@@ -11,8 +11,9 @@ import Network.Wai.Handler.Warp qualified as Warp
 import Options.Applicative ((<**>))
 import Options.Applicative qualified as Opt
 
-newtype Options = Options
+data Options = Options
   { port :: Warp.Port
+  , enableCorsMiddleware :: Bool
   }
   deriving stock (Show, Eq)
 
@@ -25,7 +26,18 @@ opt =
           <> Opt.short 'p'
           <> Opt.metavar "PORT"
           <> Opt.value 3939
-          <> Opt.help "The path where the script configuration is."
+          <> Opt.help "The port to run the server on."
+      )
+    <*> Opt.switch
+      ( Opt.long "enable-cors-middleware"
+          <> Opt.short 'c'
+          <> Opt.help
+            ( unwords
+                [ "Enable cors middleware."
+                , "This is usually required for some local servers."
+                , "For security reasons, this should be disabled in production."
+                ]
+            )
       )
 
 parseOptions :: IO Options