Fecha imediatamente porque você não está enviando nada para ele. Você precisa especificar a saída para a impressão bonita:
dynamicLogWithPP $ sjanssenPP {ppOutput = hPutStrLn xmproc},
Por alguma razão, minha configuração do xmonad não iniciará o xmobar, mas não causará nenhum erro, e o comando xmobar
o executará corretamente. Aqui está o meu xmobar.hs
import XMonad
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.DynamicLog
import XMonad.Util.Run(spawnPipe)
main = do
xmproc <- spawnPipe "xmobar"
xmonad $ defaultConfig
{ terminal = "terminator"
, layoutHook = avoidStruts $ layoutHook defaultConfig
, manageHook=manageHook defaultConfig <+> manageDocks
, logHook = dynamicLogWithPP $ sjanssenPP { ppOrder = reverse }
, borderWidth = 1
}
Tags window-manager xmonad