forked from colonelpanic/dotfiles
[XMonad] Add a slight fade to inactive window
This commit is contained in:
parent
3b6de279e7
commit
52c531cd75
@ -5,6 +5,7 @@ import XMonad.Actions.WindowBringer
|
||||
import XMonad.Config ()
|
||||
import XMonad.Hooks.EwmhDesktops
|
||||
import XMonad.Hooks.ManageDocks
|
||||
import XMonad.Hooks.FadeInactive
|
||||
import XMonad.Layout.LayoutCombinators
|
||||
import XMonad.Layout.MultiToggle
|
||||
import XMonad.Layout.MultiToggle.Instances
|
||||
@ -19,11 +20,15 @@ main = xmonad $ ewmh $ pagerHints def
|
||||
, terminal = "urxvt"
|
||||
, manageHook = manageDocks <+> manageHook def
|
||||
, layoutHook = myLayoutHook
|
||||
, logHook = myLogHook
|
||||
, handleEventHook = docksEventHook <+> fullscreenEventHook
|
||||
, startupHook = myStartup
|
||||
, keys = customKeys delKeys addKeys
|
||||
}
|
||||
|
||||
myLogHook :: X()
|
||||
myLogHook = fadeInactiveLogHook 0.9
|
||||
|
||||
delKeys _ = []
|
||||
|
||||
shiftThenView i = W.greedyView i . W.shift i
|
||||
|
Loading…
Reference in New Issue
Block a user