twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-07-31 20:21:51 -07:00
Code Issues Packages Projects Releases Wiki Activity

Wrapping the empty string yields the empty string

Browse Source
This commit is contained in:
Spencer Janssen
2007-10-18 00:15:42 +00:00
parent e4416696c1
commit 30e99281b2
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
DynamicLog.hs
View File

@@ -125,7 +125,8 @@ pprWindowSetXinerama ws = "[" ++ unwords onscreen ++ "] " ++ unwords offscreen
. sortBy (comparing S.tag) $ S.hidden ws
wrap :: String -> String -> String -> String
wrap l r m = l ++ m ++ r
wrap l r "" = ""
wrap l r m = l ++ m ++ r
-- | Intersperse spaces, filtering empty words.
unwords' :: [String] -> String