feat: implement t-rWcmRMaWX.2

1 files changed, 2 insertions, 1 deletions

diff --git a/Omni/Agent/Log.hs b/Omni/Agent/Log.hs
index afaf1da..93c70e1 100644
--- a/Omni/Agent/Log.hs
+++ b/Omni/Agent/Log.hs
@@ -11,6 +11,7 @@ import qualified Data.Text.IO as TIO
 import qualified System.Console.ANSI as ANSI
 import qualified System.IO as IO
 import System.IO.Unsafe (unsafePerformIO)
+import Text.Printf (printf)
 
 -- | Status of the agent for the UI
 data Status = Status
@@ -91,7 +92,7 @@ render = do
           <> " | Files: "
           <> tshow statusFiles
           <> " | Credits: $"
-          <> tshow statusCredits
+          <> str (printf "%.2f" statusCredits :: String)
           <> " | Time: "
           <> statusTime