diff options
| -rw-r--r-- | DynamicLog.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/DynamicLog.hs b/DynamicLog.hs index 07a14f7..c10dc88 100644 --- a/DynamicLog.hs +++ b/DynamicLog.hs @@ -134,7 +134,7 @@ unwords' :: [String] -> String unwords' = sepBy " " sepBy :: String -> [String] -> String -sepBy sep = concat . intersperse sep . filter null +sepBy sep = concat . intersperse sep . filter (not . null) -- TODO dzenColor xmobarColor :: String -> String -> String -> String |