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:
Tomas Janousek 2016-10-30 00:56:25 +02:00
parent 7bf8544f1c
commit d07f0a9ee4
2 changed files with 6 additions and 1 deletions

View File

@ -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`

View File

@ -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.