diff options
| author | allbery.b <allbery.b@gmail.com> | 2015-04-23 17:44:36 +0200 |
|---|---|---|
| committer | allbery.b <allbery.b@gmail.com> | 2015-04-23 17:44:36 +0200 |
| commit | a146adacfc3cde0dee18e05fa365870358adefd3 (patch) | |
| tree | 4468bdc8c5a48d1b7ccbfe4639b33d71e4c0c09d | |
| parent | 099bde5d7318929075ffa44636be5f7f816dddcc (diff) | |
| download | XMonadContrib-a146adacfc3cde0dee18e05fa365870358adefd3.tar.gz XMonadContrib-a146adacfc3cde0dee18e05fa365870358adefd3.tar.xz XMonadContrib-a146adacfc3cde0dee18e05fa365870358adefd3.zip | |
ewmh-hook-order
Ignore-this: 8c9a760ab88179f6b975c5c05a5426a0
Reorder the application of hooks so that users' config is honored.
Notably, this means setWMName works in startupHook instead of
needing to do it repeatedly in logHook.
darcs-hash:20150423154436-181ff-9773ca353e60c265e5831ee1bdbd993fd067b509.gz
| -rw-r--r-- | XMonad/Hooks/EwmhDesktops.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Hooks/EwmhDesktops.hs b/XMonad/Hooks/EwmhDesktops.hs index 8b3a644..9176691 100644 --- a/XMonad/Hooks/EwmhDesktops.hs +++ b/XMonad/Hooks/EwmhDesktops.hs @@ -55,7 +55,8 @@ ewmh :: XConfig a -> XConfig a ewmh c = c { startupHook = startupHook c +++ ewmhDesktopsStartup , handleEventHook = handleEventHook c +++ ewmhDesktopsEventHook , logHook = logHook c +++ ewmhDesktopsLogHook } - where x +++ y = mappend x y + -- @@@ will fix this correctly later with the rewrite + where x +++ y = mappend y x -- | -- Initializes EwmhDesktops and advertises EWMH support to the X |