wgester/dotfiles
1
0
Fork 0
forked from colonelpanic/dotfiles
Code Pull Requests Activity

[XMonad] Add a slight fade to inactive window

Browse Source
This commit is contained in:
Ivan Malison 2016-09-27 17:25:36 -07:00
parent 3b6de279e7
commit 52c531cd75
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
dotfiles/xmonad/xmonad.hs
View File

@ -5,6 +5,7 @@ import XMonad.Actions.WindowBringer
import XMonad.Config () import XMonad.Config ()
import XMonad.Hooks.EwmhDesktops import XMonad.Hooks.EwmhDesktops
import XMonad.Hooks.ManageDocks import XMonad.Hooks.ManageDocks
import XMonad.Hooks.FadeInactive
import XMonad.Layout.LayoutCombinators import XMonad.Layout.LayoutCombinators
import XMonad.Layout.MultiToggle import XMonad.Layout.MultiToggle
import XMonad.Layout.MultiToggle.Instances import XMonad.Layout.MultiToggle.Instances
@ -19,11 +20,15 @@ main = xmonad $ ewmh $ pagerHints def
, terminal = "urxvt" , terminal = "urxvt"
, manageHook = manageDocks <+> manageHook def , manageHook = manageDocks <+> manageHook def
, layoutHook = myLayoutHook , layoutHook = myLayoutHook
, logHook = myLogHook
, handleEventHook = docksEventHook <+> fullscreenEventHook , handleEventHook = docksEventHook <+> fullscreenEventHook
, startupHook = myStartup , startupHook = myStartup
, keys = customKeys delKeys addKeys , keys = customKeys delKeys addKeys
} }
myLogHook :: X()
myLogHook = fadeInactiveLogHook 0.9
delKeys _ = [] delKeys _ = []
shiftThenView i = W.greedyView i . W.shift i shiftThenView i = W.greedyView i . W.shift i