aboutsummaryrefslogtreecommitdiffstats
path: root/Operations.hs
diff options
context:
space:
mode:
authorDon Stewart <dons@cse.unsw.edu.au>2007-09-11 07:19:28 +0200
committerDon Stewart <dons@cse.unsw.edu.au>2007-09-11 07:19:28 +0200
commitb66816a5280bdc47726b0d2ef5cdba4f7c53c1ba (patch)
tree408d94e77828fa7379c50edb6f175053ab57b059 /Operations.hs
parent31b505b74deb27cc341ad062e59beb16deff44d5 (diff)
downloadxmonad-b66816a5280bdc47726b0d2ef5cdba4f7c53c1ba.tar.gz
xmonad-b66816a5280bdc47726b0d2ef5cdba4f7c53c1ba.tar.xz
xmonad-b66816a5280bdc47726b0d2ef5cdba4f7c53c1ba.zip
pointfree looks nicer here
darcs-hash:20070911051928-9c5c1-98dc6a201f22dddb80c28f5c63cbc0cc011d3f33.gz
Diffstat (limited to 'Operations.hs')
-rw-r--r--Operations.hs2
1 files changed, 1 insertions, 1 deletions
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 ()