summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 1c2afd4..236e779 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -583,6 +583,6 @@ printVals = withFocus $ \focusId -> do
583 printAvg (str, formula) = do 583 printAvg (str, formula) = do
584 result <- focusState (gFocus' . eStats) (findAverage [name] formula) 584 result <- focusState (gFocus' . eStats) (findAverage [name] formula)
585 case result of 585 case result of
586 Just avg -> shellPutStrLn $ printf "%*s: %.2f" maxLength (CI.original str) (fromRational avg :: Double) 586 Just avg -> shellPutStrLn $ printf "%*s: %5.1f" maxLength (CI.original str) (fromRational avg :: Double)
587 Nothing -> return () 587 Nothing -> return ()
588 mapM_ printAvg $ Map.toList sheet 588 mapM_ printAvg $ Map.toList sheet