unwords package:xmonad-contrib

unwords :: [String] -> String
xmonad-contrib XMonad.Config.Prime XMonad.Prelude
unwords joins words with separating spaces (U+0020 SPACE). unwords is neither left nor right inverse of words: 
>>> words (unwords [" "])
[]

>>> unwords (words "foo\nbar")
"foo bar"

Examples

>>> unwords ["Lorem", "ipsum", "dolor"]
"Lorem ipsum dolor"

>>> unwords ["foo", "bar", "", "baz"]
"foo bar  baz"
wrapUnwords :: String -> String -> [String] -> String
xmonad-contrib XMonad.Hooks.DynamicIcons
Join words with spaces, and wrap the result in delimiters unless there was exactly one element.

Examples

>>> wrapUnwords "{" "}" ["A", "B"]
"{A B}"

>>> wrapUnwords "{" "}" ["A"]
"A"

>>> wrapUnwords "{" "}" []
""