From f22c2ddc8e03ea0f8079f68b58fc7673ee70b455 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Fri, 16 Sep 2016 14:38:11 -0700 Subject: [PATCH] Revert "Revert "[XMonad] Taffybar support in xmonad.hs"" This reverts commit 1222f354639ba55b5073f970e973e97597a8faed. --- 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