Update smartspacing
This commit is contained in:
parent
c5b4569491
commit
77a9fd5c11
1 changed files with 3 additions and 1 deletions
|
@ -15,6 +15,7 @@ import XMonad.Layout.Spacing
|
|||
import XMonad.Layout.ToggleLayouts (toggleLayouts)
|
||||
import XMonad.Util.EZConfig
|
||||
import qualified Nord as N
|
||||
import qualified XMonad.Layout.Spacing as SS (Border(..))
|
||||
|
||||
-- Tidy modules
|
||||
import KeyBindings as Keys (modify)
|
||||
|
@ -25,9 +26,10 @@ import Scratchpad (modify)
|
|||
--------- toggle btw vvvvvvvvvv or vvvvv
|
||||
layouts = toggleLayouts fullscreen tiled
|
||||
where
|
||||
smallBorder = SS.Border 5 5 5 5
|
||||
fullscreen = (noBorders Full)
|
||||
tiled = smarts $ resizableTall ||| (Mirror resizableTall)
|
||||
smarts = (smartSpacingWithEdge 5) . smartBorders
|
||||
smarts = (spacingRaw True smallBorder True smallBorder True) . smartBorders
|
||||
resizableTall = ResizableTall 1 (5/100) (1/2) []
|
||||
|
||||
-- Use the `xprop' tool to get the info you need for these matches.
|
||||
|
|
Loading…
Reference in a new issue