diff options
Diffstat (limited to 'Utility/DataUnits.hs')
| -rw-r--r-- | Utility/DataUnits.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/DataUnits.hs b/Utility/DataUnits.hs index 7575af21f..e035b2f86 100644 --- a/Utility/DataUnits.hs +++ b/Utility/DataUnits.hs @@ -120,7 +120,7 @@ roughSize units short i showUnit x (Unit size abbrev name) = s ++ " " ++ unit where - v = (fromInteger x :: Double) / fromInteger size + v = (fromInteger x :: Double) / fromInteger size s = showImprecise 2 v unit | short = abbrev |