diff options
| author | Don Stewart <dons@cse.unsw.edu.au> | 2007-04-01 04:54:33 +0200 |
|---|---|---|
| committer | Don Stewart <dons@cse.unsw.edu.au> | 2007-04-01 04:54:33 +0200 |
| commit | 8122f7672eeaf1bce37c37b64cb66b9e140fc445 (patch) | |
| tree | dc6eb690eaae1cc7ef3a7ea39e8df3a336a2d79e /Operations.hs | |
| parent | f796fb0976b65620a4e6ab80e045e1be3fdeb0de (diff) | |
| download | metatile-8122f7672eeaf1bce37c37b64cb66b9e140fc445.tar metatile-8122f7672eeaf1bce37c37b64cb66b9e140fc445.zip | |
restore dwm-style keybindings. mod-shift-{j,k} resize in vert mode
darcs-hash:20070401025433-9c5c1-79adc3fdb8db4cf7929dd6d121ec66c21f24a0e2
Diffstat (limited to 'Operations.hs')
| -rw-r--r-- | Operations.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index e404b7d..decb42f 100644 --- a/Operations.hs +++ b/Operations.hs @@ -244,7 +244,11 @@ setBorder w p = withDisplay $ \d -> io $ setWindowBorder d w p raise :: Ordering -> X () raise = windows . W.rotate --- | promote. Make the focused window the master window in its workspace +-- | promote. Make the focused window the master window in its +-- workspace , in non-fullscreen mode. +-- +-- TODO: generic cycling clockwise and anticlockwise +-- promote :: X () promote = windows $ \w -> maybe w (\k -> W.promote k w) (W.peek w) |