From 7ff2052235140669bc9e9c5c1e94b194626dee67 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Fri, 2 Dec 2016 14:52:54 +0100 Subject: Alignment --- src/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') 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 printAvg (str, formula) = do result <- focusState (gFocus' . eStats) (findAverage [name] formula) case result of - Just avg -> shellPutStrLn $ printf "%*s: %.2f" maxLength (CI.original str) (fromRational avg :: Double) + Just avg -> shellPutStrLn $ printf "%*s: %5.1f" maxLength (CI.original str) (fromRational avg :: Double) Nothing -> return () mapM_ printAvg $ Map.toList sheet -- cgit v1.2.3