From 6d4e757ed34e4d841b19a2fbec33ceccdcced4cf Mon Sep 17 00:00:00 2001 From: Nathaniel Wesley Filardo Date: Mon, 21 Sep 2015 15:18:04 -0400 Subject: [PATCH] Add newline to end of report printout --- lib/Grade/Print.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/Grade/Print.hs b/lib/Grade/Print.hs index 4ab609a..f5a8af9 100644 --- a/lib/Grade/Print.hs +++ b/lib/Grade/Print.hs @@ -50,4 +50,6 @@ total :: ReportFile -> (Double,Double) total (RF secs) = foldr (\(RFS _ ss sm _ _) (e,t) -> (ss+e,sm+t)) (0.0,0.0) secs printReport :: ReportFile -> Doc e -printReport r@(RF s) = vcat (map printSection s) <> line <> "TOTAL:" <+> (uncurry printGrade $ total r) +printReport r@(RF s) = + vcat (map printSection s) <> line + <> "TOTAL:" <+> (uncurry printGrade $ total r) <> line -- 2.50.1