mynix/system
1
1
Fork 0
Code Issues 2 Pull requests Activity

users/xmonad: remove three col layout

Browse source
This commit is contained in:
Dmitriy Pleshevskiy 2022-11-17 23:15:47 +03:00
parent 0d72316924
commit 5a589f11d7
Signed by: pleshevskiy
GPG key ID: 1B59187B161C0215
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
users/modules/window_manager/xmonad_config.hs
View file

@ -40,7 +40,6 @@ import XMonad.Layout.Grid
import XMonad.Layout.LimitWindows (limitWindows)
import XMonad.Layout.NoBorders (smartBorders)
import XMonad.Layout.Spacing (spacing)
import XMonad.Layout.ThreeColumns (ThreeCol (..))
import XMonad.Prompt (XPConfig (..), XPPosition (Top), XPType (..), XPrompt (..), mkComplFunFromList', mkXPromptWithModes)
import qualified XMonad.StackSet as W
import XMonad.Util.EZConfig
@ -159,11 +158,10 @@ myPolybarLogHook dbus = myLogHook <+> dynamicLogWithPP (polybarHook dbus)
-- The available layouts. Note that each layout is separated by |||,
-- which denotes layout choice.
--
myLayout = avoidStruts . smartBorders $ (Mirror tiled ||| tiled ||| column3 ||| full)
myLayout = avoidStruts . smartBorders $ (Mirror tiled ||| tiled ||| full)
where
full = Full
tiled = gapSpaced 5 $ Tall nmaster incRatio ratio
column3 = gapSpaced 5 $ ThreeColMid nmaster incRatio ratio
nmaster = 1
incRatio = (3 / 100)
@ -308,7 +306,7 @@ myKeys conf =
layout_kb =
[ -- Rotate through the available layout algorithms
("M-<Space>", cycleThroughLayouts ["Full", "Mirror Spacing Tall"]),
("M-<Tab>", cycleThroughLayouts ["Spacing ThreeCol", "Spacing Tall", "Mirror Spacing Tall"]),
("M-<Tab>", cycleThroughLayouts ["Spacing Tall", "Mirror Spacing Tall"]),
-- Reset the layouts on the current workspace to default
("M-S-<Space>", setLayout $ XMonad.layoutHook conf),
-- Shrink the master area