[XMonad] Taffybar support in xmonad.hs

This commit is contained in:
Ivan Malison 2016-09-16 14:34:25 -07:00
parent 64b0ea9ec4
commit 148e766a9b
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -1,3 +1,5 @@
import System.Taffybar.Hooks.PagerHints (pagerHints)
import XMonad hiding ( (|||) ) import XMonad hiding ( (|||) )
import XMonad.Actions.WindowBringer import XMonad.Actions.WindowBringer
import XMonad.Config () import XMonad.Config ()
@ -12,7 +14,7 @@ import XMonad.Layout.ThreeColumns
import qualified XMonad.StackSet as W import qualified XMonad.StackSet as W
import XMonad.Util.CustomKeys import XMonad.Util.CustomKeys
main = xmonad $ ewmh def main = xmonad $ ewmh $ pagerHints def
{ modMask = mod4Mask { modMask = mod4Mask
, terminal = "urxvt" , terminal = "urxvt"
, manageHook = manageDocks <+> manageHook def , manageHook = manageDocks <+> manageHook def