From 287773d9db99d564ccbb07e91b14ee96f16908df Mon Sep 17 00:00:00 2001 From: Dmitriy Pleshevskiy Date: Fri, 22 Apr 2022 11:52:03 +0300 Subject: [PATCH] refac(prog/xmonad): change layout --- programs/xmonad/xmonad.hs | 14 ++++---------- 1 file changed, 4 insertions(+), 10 deletions(-) diff --git a/programs/xmonad/xmonad.hs b/programs/xmonad/xmonad.hs index b1e3f5d..c71ae14 100644 --- a/programs/xmonad/xmonad.hs +++ b/programs/xmonad/xmonad.hs @@ -17,7 +17,9 @@ import XMonad.Hooks.EwmhDesktops import XMonad.Hooks.ManageDocks import XMonad.Hooks.StatusBar import XMonad.Hooks.StatusBar.PP +import XMonad.Layout.BoringWindows (boringWindows) import XMonad.Layout.Grid +import XMonad.Layout.LimitWindows (limitWindows) import XMonad.Layout.NoBorders import XMonad.Layout.PerWorkspace import XMonad.Util.EZConfig @@ -188,20 +190,13 @@ myMouseBindings (XConfig {XMonad.modMask = modm}) = M.fromList -- which denotes layout choice. -- myLayout = avoidStruts - $ onWorkspace "1:web" (myTall (1/2) ||| myFull ||| Grid) - $ onWorkspace "4:chat" (myTall (1/2)) + $ onWorkspaces ["1:web", "4:chat"] (myTall (1/2) ||| myFull ||| Grid) $ myTall (2/3) ||| myFull ||| Grid where - myTall = smartBorders . Tall nmaster delta + myTall = limitWindows 4 . boringWindows . smartBorders . Tall 1 (3/100) myFull = noBorders Full - -- The default number of windows in the master pane - nmaster = 1 - - -- Percent of screen to increment by when resizing panes - delta = 3/100 - ------------------------------------------------------------------------ -- Window rules: @@ -225,7 +220,6 @@ myManageHook = composeAll , className =? "Gnome-calculator" --> doFloat , className =? "Gnome-font-viewer" --> doFloat , className =? "Org.gnome.Nautilus" --> doFloat - , className =? "firefox-trunk-nightly" --> doShift "1:web" , resource =? "telegram-desktop" --> doShift "4:chat" , className =? "Thunderbird" --> doShift "4:chat" -- my libs