From cabb0812de05827b91d0938e1f296e3abb8fc5d5 Mon Sep 17 00:00:00 2001 From: Chris Done Date: Tue, 23 Dec 2014 12:04:01 +0100 Subject: [PATCH] unlines in core packages, consumer can handle #68 --- Stackage/ServerBundle.hs | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/Stackage/ServerBundle.hs b/Stackage/ServerBundle.hs index 22b035c8..6cdf5cb4 100644 --- a/Stackage/ServerBundle.hs +++ b/Stackage/ServerBundle.hs @@ -69,11 +69,9 @@ serverBundle time title slug bp@BuildPlan {..} = GZip.compress $ Tar.write toBuilder (asText "\n") corePackagesList = - builderToLazy $ toBuilder $ - intercalate - "\n" - (map (\(PackageName name) -> name) - (M.keys $ siCorePackages bpSystemInfo)) + builderToLazy $ toBuilder $ unlines $ + map (\(PackageName name) -> name) + (M.keys $ siCorePackages bpSystemInfo) docsListing :: BuildPlan -> FilePath -- ^ docs directory