summaryrefslogtreecommitdiff
path: root/Omni
diff options
context:
space:
mode:
authorBen Sima <ben@bensima.com>2025-11-22 18:17:44 -0500
committerBen Sima <ben@bensima.com>2025-11-22 18:17:44 -0500
commit15617d846824bc407e76634971ebbb2339bfb499 (patch)
tree23c4e79d29dddb11c2ac7d745e0769ebdf251e6a /Omni
parent12d099d7e2323ab1d2e06a0f9317814e4050c498 (diff)
fix: remove redundant imports in Omni/Agent/Log.hs
Amp-Thread-ID: https://ampcode.com/threads/T-ca3b086b-5a85-422a-b13d-256784c04221 Co-authored-by: Amp <amp@ampcode.com>
Diffstat (limited to 'Omni')
-rw-r--r--Omni/Agent/Log.hs9
1 files changed, 4 insertions, 5 deletions
diff --git a/Omni/Agent/Log.hs b/Omni/Agent/Log.hs
index c78dc4b..3f305d8 100644
--- a/Omni/Agent/Log.hs
+++ b/Omni/Agent/Log.hs
@@ -6,7 +6,6 @@
module Omni.Agent.Log where
import Alpha
-import Control.Applicative ((<$>), (<*>))
import Data.Aeson ((.:), (.:?))
import qualified Data.Aeson as Aeson
import qualified Data.ByteString.Lazy as BL
@@ -136,13 +135,13 @@ instance Aeson.FromJSON LogEntry where
Aeson.withObject "LogEntry" <| \v ->
(LogEntry </ (v .: "message"))
<*> v
- .:? "threadId"
+ .:? "threadId"
<*> v
- .:? "credits"
+ .:? "credits"
<*> v
- .:? "totalCredits"
+ .:? "totalCredits"
<*> v
- .:? "timestamp"
+ .:? "timestamp"
-- | Parse a log line and update status
processLogLine :: Text -> IO ()