mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 03:20:21 -07:00
X.L.Fullscreen: fullscreenSupport advertises fs support in _NET_SUPPORTED
Makes X.L.Fullscreen behave similarly to ewmhFullscreen. See the X.H.EwmhDesktops commit for details.
This commit is contained in:
parent
7bf8544f1c
commit
d07f0a9ee4
@ -11,6 +11,9 @@
|
||||
support in `_NET_SUPPORTED` and fixes fullscreening of applications that
|
||||
explicitly check it, e.g. mupdf-gl, sxiv, …
|
||||
|
||||
`XMonad.Layout.Fullscreen.fullscreenSupport` now advertises it as well,
|
||||
and no configuration changes are required in this case.
|
||||
|
||||
### New Modules
|
||||
|
||||
* `XMonad.Layout.TallMastersCombo`
|
||||
|
@ -32,6 +32,7 @@ module XMonad.Layout.Fullscreen
|
||||
|
||||
import XMonad
|
||||
import XMonad.Layout.LayoutModifier
|
||||
import XMonad.Hooks.EwmhDesktops (fullscreenStartup)
|
||||
import XMonad.Hooks.ManageHelpers (isFullscreen)
|
||||
import XMonad.Util.WindowProperties
|
||||
import qualified XMonad.Util.Rectangle as R
|
||||
@ -77,7 +78,8 @@ fullscreenSupport :: LayoutClass l Window =>
|
||||
fullscreenSupport c = c {
|
||||
layoutHook = fullscreenFull $ layoutHook c,
|
||||
handleEventHook = handleEventHook c <+> fullscreenEventHook,
|
||||
manageHook = manageHook c <+> fullscreenManageHook
|
||||
manageHook = manageHook c <+> fullscreenManageHook,
|
||||
startupHook = startupHook c <+> fullscreenStartup
|
||||
}
|
||||
|
||||
-- | Messages that control the fullscreen state of the window.
|
||||
|
Loading…
x
Reference in New Issue
Block a user