diff options
| -rw-r--r-- | DynamicLog.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/DynamicLog.hs b/DynamicLog.hs index 8e7d188..e0d7b06 100644 --- a/DynamicLog.hs +++ b/DynamicLog.hs @@ -125,7 +125,7 @@ pprWindowSetXinerama ws = "[" ++ unwords onscreen ++ "] " ++ unwords offscreen . sortBy (comparing S.tag) $ S.hidden ws wrap :: String -> String -> String -> String -wrap l r "" = "" +wrap _ _ "" = "" wrap l r m = l ++ m ++ r shorten :: Int -> String -> String |