From 148e766a9b2d0ece08f269235dbf4a28aee198db Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Fri, 16 Sep 2016 14:34:25 -0700
Subject: [PATCH] [XMonad] Taffybar support in xmonad.hs

---
 dotfiles/xmonad/xmonad.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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