From c38d5a6602b3326d9ec315c95f99ede8458281d1 Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@cse.unsw.edu.au>
Date: Tue, 11 Sep 2007 07:19:28 +0200
Subject: pointfree looks nicer here

darcs-hash:20070911051928-9c5c1-98dc6a201f22dddb80c28f5c63cbc0cc011d3f33
---
 Operations.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Operations.hs b/Operations.hs
index 770ea7d..9d20841 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -88,7 +88,7 @@ swapMaster = windows W.swapMaster
 
 -- | shift. Move a window to a new workspace, 0 indexed.
 shift :: WorkspaceId -> X ()
-shift n = windows (W.shift n)
+shift = windows . W.shift
 
 -- | view. Change the current workspace to workspace at offset n (0 indexed).
 view :: WorkspaceId -> X ()
-- 
cgit v1.2.3