diff options
Diffstat (limited to 'Plugins/Monitors/Disk.hs')
| -rw-r--r-- | Plugins/Monitors/Disk.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/Monitors/Disk.hs b/Plugins/Monitors/Disk.hs index 9a86b46..6b825d2 100644 --- a/Plugins/Monitors/Disk.hs +++ b/Plugins/Monitors/Disk.hs @@ -80,7 +80,7 @@ speedToStr :: Int -> Float -> String speedToStr n x = let units = ["B", "K", "M", "T"] toI = round :: Float -> Integer - s y j = y ++ units !! j ++ "/s" + s y j = y ++ units !! j in if n > 2 || x < 103 then s (show $ toI x) n |