1 files changed, 2 insertions, 3 deletions
diff --git a/SinkAll.hs b/SinkAll.hs
index 5531e2d..04794cc 100644
--- a/SinkAll.hs
+++ b/SinkAll.hs
@@ -18,7 +18,6 @@ import Operations
 import XMonad
 import StackSet
 
-import Control.Monad.State
 import Graphics.X11.Xlib
 
 -- $usage
@@ -33,5 +32,5 @@ sinkAll = withAll sink
 
 -- Apply a function to all windows on current workspace.
 withAll :: (Window -> WindowSet -> WindowSet) -> X ()
-withAll f = windows $ \ws -> let all = integrate' . stack . workspace . current $ ws
-                             in foldr f ws all
+withAll f = windows $ \ws -> let all' = integrate' . stack . workspace . current $ ws
+                             in foldr f ws all'