jasmine/xmonad-config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

switch to resizable tall layout

Browse source
This commit is contained in:
♥ Minnie ♥ 2025-10-05 09:52:38 +08:00
parent 7568c2aa01
commit 57ce188b85
Signed by: jasmine
GPG key ID: 8563E358D4E8040E
1 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/xmonad.hs
View file

@ -10,6 +10,7 @@ import XMonad.Hooks.Modal
import XMonad.Hooks.StatusBar
import XMonad.Layout.NoBorders
import XMonad.Layout.Renamed
import XMonad.Layout.ResizableTile
import XMonad.Layout.Spacing
import XMonad.StackSet qualified as W
import XMonad.Util.EZConfig
@ -143,6 +144,9 @@ layoutMode = mode "layout" $ mkKeysEz
[ ("t", sendMessage (JumpToLayout "dynamic tiling") >> exitMode)
, ("m", sendMessage (JumpToLayout "maximised" ) >> exitMode)
, ("f", sendMessage (JumpToLayout "fullscreen" ) >> exitMode)
-- resize tiles
, ("Page_Up" , sendMessage MirrorShrink)
, ("Page_Down", sendMessage MirrorExpand)
-- adjust master/slave split (stays in mode)
, ("<Left>" , sendMessage Shrink)
, ("<Right>" , sendMessage Expand)
@ -164,7 +168,7 @@ spawnMode = mode "launch" $ mkKeysEz
myLayouts = myTile ||| myMax ||| myFull
where
-- our layouts
myTile = renamed [Replace "dynamic tiling"] . avoidStruts . myGaps $ Tall nmaster delta ratio
myTile = renamed [Replace "dynamic tiling"] . avoidStruts . myGaps $ ResizableTall nmaster delta ratio []
myMax = renamed [Replace "maximised" ] . avoidStruts . myGaps $ Full
myFull = renamed [Replace "fullscreen" ] . noBorders $ Full
-- add a configurable amount of space around windows.