-- Imports. import XMonad import XMonad.Hooks.DynamicLog -- The main function. main = xmonad =<< statusBar myBar myPP toggleStrutsKey myConfig -- Command to launch the bar. myBar = "xmobar" -- Custom PP, configure it as you like. It determines what is being written to the bar. myPP = xmobarPP { ppCurrent = xmobarColor "#429942" "" . wrap "<" ">" } -- Key binding to toggle the gap for the bar. toggleStrutsKey XConfig {XMonad.modMask = modMask} = (modMask, xK_b) -- Main configuration, override the defaults to your liking. myConfig = defaultConfig { modMask = mod4Mask }
Hi,Thank you very much for your help.Would you mind posting an example of how I might use statusBar? I'm kind of a Haskell newb.On Sun, May 4, 2014 at 4:58 PM, Brandon Allbery <allbery.b@gmail.com> wrote:It's coming from the xmobar combinator applied to defaultConfig:On Sun, May 4, 2014 at 2:49 PM, Eyal Erez <oneself@gmail.com> wrote:
To this:main = xmonad =<< xmobar defaultConfig{ -- no logHook defined-- Other definitions.}This works fine, but now for some reason, Alt-B is bound to ToggleStruts. I would like this to be Ctrl-Shift-B, and I have a key binding which adds the second one, but I can't seem to get rid of the first.How can I unbind Alt-B, and where is it coming from?xmobar conf = statusBar "xmobar" xmobarPP toggleStrutsKey confIf you want to replace toggleStrutsKey then you will need to use your own invocation of statusBar.-- | -- Helper function which provides ToggleStruts keybinding -- toggleStrutsKey :: XConfig t -> (KeyMask, KeySym) toggleStrutsKey XConfig{modMask = modm} = (modm, xK_b )--brandon s allbery kf8nh sine nomine associatesunix, openafs, kerberos, infrastructure, xmonad http://sinenomine.net--Eyal Erez <oneself@gmail.com>
There are 10 types of people, those who know binary and those who don't.