diff options
Diffstat (limited to 'Omni')
| -rw-r--r-- | Omni/Agent/Log.hs | 3 |
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 |