ADD button to float windows if I want

This commit is contained in:
Nathan Dwarshuis 2021-03-17 14:19:51 -04:00
parent e98153933f
commit debf4cd098
1 changed files with 2 additions and 0 deletions

View File

@ -55,6 +55,7 @@ import XMonad.Layout.NoFrillsDecoration
import XMonad.Layout.PerWorkspace
import XMonad.Layout.Renamed
import XMonad.Layout.Tabbed
import qualified XMonad.Operations as O
import qualified XMonad.StackSet as W
import XMonad.Util.Cursor
import qualified XMonad.Util.ExtensibleState as E
@ -385,6 +386,7 @@ mkKeys ts c =
, ("M-<Return>", "next layout", sendMessage NextLayout)
, ("M-S-<Return>", "reset layout", setLayout $ layoutHook c)
, ("M-t", "sink tiling", withFocused $ windows . W.sink)
, ("M-S-t", "float tiling", withFocused O.float)
, ("M--", "shrink", sendMessage Shrink)
, ("M-=", "expand", sendMessage Expand)
, ("M-S--", "remove master window", sendMessage $ IncMasterN (-1))