diff options
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) |