twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 03:20:21 -07:00
Code Issues Packages Projects Releases Wiki Activity

X.L.NoBorders: Add OnlyFloat

Browse Source 
This adds a new constructor to Ambiguity to unconditionally remove
borders for all floating windows.
This commit is contained in:
slotThe 2021-07-16 13:52:20 +02:00
parent 5d0a3de24d
commit 28fff7c1a2
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
XMonad/Layout/NoBorders.hs
View File

@ -279,6 +279,8 @@ instance SetsAmbiguous Ambiguity where
in lr == wr1 && (not . or) vu in lr == wr1 && (not . or) vu
OnlyLayoutFloat -> OnlyLayoutFloat ->
lr == wr1 lr == wr1
OnlyFloat ->
True
_ -> _ ->
wr1 `R.supersetOf` sr wr1 `R.supersetOf` sr
return w1 return w1
@ -288,6 +290,7 @@ instance SetsAmbiguous Ambiguity where
| Screen <- amb = [w] | Screen <- amb = [w]
| OnlyScreenFloat <- amb = [] | OnlyScreenFloat <- amb = []
| OnlyLayoutFloat <- amb = [] | OnlyLayoutFloat <- amb = []
| OnlyFloat <- amb = []
| OnlyLayoutFloatBelow <- amb = [] | OnlyLayoutFloatBelow <- amb = []
| OtherIndicated <- amb | OtherIndicated <- amb
, let nonF = map integrate $ W.current wset : W.visible wset , let nonF = map integrate $ W.current wset : W.visible wset
@ -326,6 +329,9 @@ data Ambiguity
-- ^ Focus in an empty screen does not count as ambiguous. -- ^ Focus in an empty screen does not count as ambiguous.
| OtherIndicated | OtherIndicated
-- ^ No borders on full when all other screens have borders. -- ^ No borders on full when all other screens have borders.
| OnlyFloat
-- ^ Remove borders on all floating windows; tiling windows of
-- any kinds are not affected.
| Screen | Screen
-- ^ Borders are never drawn on singleton screens. With this one you -- ^ Borders are never drawn on singleton screens. With this one you
-- really need another way such as a statusbar to detect focus. -- really need another way such as a statusbar to detect focus.