From 4af01975f547c31411300be0d5801ef15e8b569c Mon Sep 17 00:00:00 2001
From: Spencer Janssen <spencerjanssen@gmail.com>
Date: Fri, 18 Sep 2009 05:55:47 +0200
Subject: Remove redundant parens

Ignore-this: aefa46cdb3ad8496e20d15a7e6b5fa52

darcs-hash:20090918035547-25a6b-626adbc3a96a55063577fe31043b53cc14264966
---
 XMonad/Core.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'XMonad')

diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index be366cd..a410590 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -415,7 +415,7 @@ recompile force = io $ do
     libTs <- mapM getModTime . Prelude.filter isSource =<< allFiles lib
     srcT <- getModTime src
     binT <- getModTime bin
-    if (force || srcT > binT || any (binT<) libTs)
+    if force || any (binT <) (srcT : libTs)
       then do
         -- temporarily disable SIGCHLD ignoring:
         uninstallSignalHandlers
-- 
cgit v1.2.3