On Mon, Nov 5, 2012 at 11:29 AM, Eyal Erez <oneself@gmail.com> 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