summaryrefslogtreecommitdiffstats
path: root/Operations.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-08-15 04:55:04 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-08-15 04:55:04 +0200
commit215b5fabba19875f9032d7ce7bf33c0291149b47 (patch)
tree7cc5a80ee012da44d0277a82283047fcaec9b73b /Operations.hs
parent649dfb57a92e579859fb2d85f85ba961333fdd17 (diff)
downloadmetatile-215b5fabba19875f9032d7ce7bf33c0291149b47.tar
metatile-215b5fabba19875f9032d7ce7bf33c0291149b47.zip
Add greedyView, make it the default action for mod-wer
darcs-hash:20070815025504-a5988-00ff316a056c48cc07c5e90925702d2ac09ae666
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 d5a5d3e..dce8195 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -92,7 +92,7 @@ shift n = windows (W.shift n)
-- | view. Change the current workspace to workspace at offset n (0 indexed).
view :: WorkspaceId -> X ()
-view = windows . W.view
+view = windows . W.greedyView
-- | Modify the size of the status gap at the top of the current screen
-- Taking a function giving the current screen, and current geometry.