formatting

This commit is contained in:
Simon Michael 2008-10-09 09:25:37 +00:00
parent e7cf5df029
commit 3fcb1aaa6c

View File

@ -33,7 +33,8 @@ balwidth = 12
@ @
-} -}
showEntryDescription e = (showDate $ edate e) ++ " " ++ (showDescription $ edescription e) ++ " " showEntryDescription e =
(showDate $ edate e) ++ " " ++ (showDescription $ edescription e) ++ " "
showDate d = printf "%-10s" d showDate d = printf "%-10s" d
showDescription s = printf "%-20s" (elideRight 20 s) showDescription s = printf "%-20s" (elideRight 20 s)