
Thank you for your help,
Yeah, that's what I figured as well, but then I get this error when I
recompile:
xmonad.hs:391:25:
Couldn't match expected type `a -> a1' against inferred type `X ()'
In the first argument of `(>>)', namely `takeTopFocus'
In the first argument of `($)', namely
`takeTopFocus >> dynamicLogWithPP'
In the `logHook' field of a record
On Mon, Nov 5, 2012 at 11:41 AM, Brandon Allbery
On Mon, Nov 5, 2012 at 11:29 AM, Eyal Erez
wrote: I apologize in advance for the newbie question, but how can I combine takeTopFocus with my existing logHook for xmobar? Currently, my logHook looks like this: logHook = dynamicLogWithPP $ xmobarPP { ppOutput = hPutStrLn xmproc , ppTitle = xmobarColor "#a8fc46" "" . shorten 50 , ppOrder = \(ws:_:t:_) -> [ws, t] }
Easiest is to prepend it:
logHook = takeTopFocus >> dynamicLogWithPP $ xmobarPP { ppOutput = hPutStrLn xmproc , ppTitle = xmobarColor "#a8fc46" "" . shorten 50 , ppOrder = \(ws:_:t:_) -> [ws, t] }
-- brandon s allbery kf8nh sine nomine associates allbery.b@gmail.com ballbery@sinenomine.net unix/linux, openafs, kerberos, infrastructure http://sinenomine.net
--
*Eyal Erez <**oneself@gmail.com*