From e1248b2b893f917d0170f7916968c456b3c1f2e4 Mon Sep 17 00:00:00 2001
From: "l.mai" <l.mai@web.de>
Date: Thu, 18 Oct 2007 05:30:00 +0200
Subject: -Wall police

darcs-hash:20071018033000-42ea9-8f269712737b88376bbe662b7dabe62d58a82146.gz
---
 DynamicLog.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'DynamicLog.hs')

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
-- 
cgit v1.2.3