From 15617d846824bc407e76634971ebbb2339bfb499 Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Sat, 22 Nov 2025 18:17:44 -0500 Subject: 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 --- Omni/Agent/Log.hs | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'Omni') 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 - .:? "threadId" + .:? "threadId" <*> v - .:? "credits" + .:? "credits" <*> v - .:? "totalCredits" + .:? "totalCredits" <*> v - .:? "timestamp" + .:? "timestamp" -- | Parse a log line and update status processLogLine :: Text -> IO () -- cgit v1.2.3