improve layout

1 files changed, 1 insertions, 1 deletions

diff --git a/Cost.hs b/Cost.hs
index 968cd31..88d1d61 100644
--- a/Cost.hs
+++ b/Cost.hs
@@ -108,7 +108,7 @@ costOverTimeTable cost thisyear = go [] thisyear $ costOverTime cost thisyear
   where
 	go t _ [] = reverse t
 	go t yprev ((c, y):ys) =
-		let s = "  " ++ show y ++ ":\t" ++ show c
+		let s = "  in " ++ show y ++ ":  " ++ show c
 		in if yprev < y - 1
 			then go (s:"  ...":t) y ys
 			else go (s:t) y ys