diff options
| author | Ben Sima <ben@bensima.com> | 2025-11-24 14:31:47 -0500 |
|---|---|---|
| committer | Ben Sima <ben@bensima.com> | 2025-11-24 14:31:47 -0500 |
| commit | 34114e2016b186a52a7245fe3fb7e2bfe5091780 (patch) | |
| tree | 274588d3de0fbfb847151581e6d8945746c60012 /Omni/Agent/Log.hs | |
| parent | 1114ce3f55c1d9d90b49469a63accde094d8535f (diff) | |
Display credits correctly and don't loop agent
Diffstat (limited to 'Omni/Agent/Log.hs')
| -rw-r--r-- | Omni/Agent/Log.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Omni/Agent/Log.hs b/Omni/Agent/Log.hs index 71a7aca..2942563 100644 --- a/Omni/Agent/Log.hs +++ b/Omni/Agent/Log.hs @@ -166,7 +166,7 @@ updateFromEntry :: LogEntry -> Status -> Status updateFromEntry LogEntry {..} s = s { statusThread = leThreadId <|> statusThread s, - statusCredits = fromMaybe (statusCredits s) (leTotalCredits <|> leCredits), + statusCredits = maybe (statusCredits s) (/ 100.0) (leTotalCredits <|> leCredits), statusTime = maybe (statusTime s) formatTime leTimestamp } |