From 2ab6fa6095dd028851b531a4963612f6d05e8962 Mon Sep 17 00:00:00 2001 From: Thomas Ulmer Date: Tue, 4 Nov 2025 09:38:34 -0800 Subject: xmonad via cabal --- xmonad/xmonad.hs | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) (limited to 'xmonad/xmonad.hs') diff --git a/xmonad/xmonad.hs b/xmonad/xmonad.hs index ee131be..2fab902 100644 --- a/xmonad/xmonad.hs +++ b/xmonad/xmonad.hs @@ -21,6 +21,7 @@ import XMonad.Actions.Minimize (minimizeWindow, withLastMinimized, maximizeWindo import XMonad.Layout.NoBorders (noBorders, smartBorders) import XMonad.Layout.Minimize (minimize) +import XMonad.Layout.ResizableThreeColumns import qualified XMonad.Layout.BoringWindows as BW myTerminal = "urxvt" @@ -76,7 +77,9 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $ , ((modm, xK_h ), sendMessage Shrink) , ((modm, xK_l ), sendMessage Expand) - + , ((modm .|. shiftMask, xK_h ), sendMessage MirrorShrink) + , ((modm .|. shiftMask, xK_l ), sendMessage MirrorExpand) + -- floating -> tiling , ((modm, xK_t ), withFocused $ windows . W.sink) @@ -131,11 +134,11 @@ myMouseBindings (XConfig {XMonad.modMask = modm}) = M.fromList ------------------------------------------------------------------------ -- Layouts: -myLayout = smartBorders tiled ||| noBorders Full +myLayout = smartBorders tiled ||| smartBorders threeCol ||| smartBorders Full where - tiled = Tall nmaster delta ratio + threeCol = ResizableThreeCol nmaster delta (1/3) [] + tiled = Tall nmaster delta (3/5) nmaster = 1 - ratio = 3/5 delta = 2/100 ------------------------------------------------------------------------ -- cgit v1.2.3