diff options
| author | Gregor Kleen <pngwjpgh@users.noreply.github.com> | 2016-12-02 14:52:54 +0100 |
|---|---|---|
| committer | Gregor Kleen <pngwjpgh@users.noreply.github.com> | 2016-12-02 14:52:54 +0100 |
| commit | 7ff2052235140669bc9e9c5c1e94b194626dee67 (patch) | |
| tree | 63b9278c6f47eb1f6d53ae1337da3891e4201288 | |
| parent | c32d96d5ce0ff89b53ae0526173400b4d7885924 (diff) | |
| download | 2017-01-16_17:13:37-7ff2052235140669bc9e9c5c1e94b194626dee67.tar 2017-01-16_17:13:37-7ff2052235140669bc9e9c5c1e94b194626dee67.tar.gz 2017-01-16_17:13:37-7ff2052235140669bc9e9c5c1e94b194626dee67.tar.bz2 2017-01-16_17:13:37-7ff2052235140669bc9e9c5c1e94b194626dee67.tar.xz 2017-01-16_17:13:37-7ff2052235140669bc9e9c5c1e94b194626dee67.zip | |
Alignment
| -rw-r--r-- | src/Main.hs | 2 |
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 |