add commas to remote list

This commit is contained in:
Joey Hess 2013-03-18 19:11:46 -04:00
parent 78c1cf5564
commit 243bda3c52

View file

@ -238,7 +238,7 @@ commitAlert = activityAlert Nothing
[Tensed "Committing" "Committed", "changes to git"]
showRemotes :: [Remote] -> TenseChunk
showRemotes = UnTensed . T.unwords . map (T.pack . Remote.name)
showRemotes = UnTensed . T.intercalate ", " . map (T.pack . Remote.name)
syncAlert :: [Remote] -> Alert
syncAlert rs = baseActivityAlert