цвета в xmobar

-- file: .xmobar/xmobarrc
<fc=#fd971f>%StdinReader%</fc>

-- file: xmonad.hs
main = do    
    xmonad =<< statusBar barExec myPP toggleStrutsKey defaultConfig
	where
		barExec = "xmobar /home/zinfandel/.xmonad/xmobarrc"

myPP :: PP
myPP = xmobarPP { ppCurrent = xmobarColor "#fd971f" ""
                -- separator between elements
                , ppSep     = xmobarColor "#fd971f" "" " ⟫ "
                }

myLogHook xmproc = dynamicLogWithPP $ compPP { ppOutput = hPutStrLn xmproc }      
 where compPP = defaultPP {                                             
                ppHidden  = xmobarColor "#ababab" ""                    
              , ppCurrent = xmobarColor "#ababab" "" . wrap "[" "]"     
              , ppUrgent  = xmobarColor "#ababab" "" . wrap "*" "*"     
              , ppLayout  = xmobarColor "#ff0000" "" 
              , ppTitle   = (\str -> "")
              , ppOrder   = \(ws:_:t:_) -> [ws, t]                      
              , ppSep     = "<fc=#ee0000> | </fc>"                      
              }