From 309bdcc15db562633ff73da4021f0020f1c0cf6d Mon Sep 17 00:00:00 2001
From: LLLL Colonq <llll@colonq>
Date: Thu, 7 Nov 2024 22:51:56 -0500
Subject: Secured API

---
 fig-monitor-twitch/main/Main.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'fig-monitor-twitch/main/Main.hs')

diff --git a/fig-monitor-twitch/main/Main.hs b/fig-monitor-twitch/main/Main.hs
index b306586..682d35b 100644
--- a/fig-monitor-twitch/main/Main.hs
+++ b/fig-monitor-twitch/main/Main.hs
@@ -11,7 +11,7 @@ data Command
   = Monitor
   | Chatbot
   | LiveChecker
-  | RedirectServer Bool
+  | RedirectServer !Bool
   | Validate
 
 parseCommand :: Parser Command
@@ -24,10 +24,10 @@ parseCommand = subparser $ mconcat
   , command "validate-endpoint" $ info (pure Validate) (progDesc "Test Twitch authentication")
   ]
 data Opts = Opts
-  { busHost :: Text
-  , busPort :: Text
-  , config :: FilePath
-  , command :: Command
+  { busHost :: !Text
+  , busPort :: !Text
+  , config :: !FilePath
+  , command :: !Command
   }
 
 parseOpts :: Parser Opts
-- 
cgit v1.2.3