XMonad가 xmobar를 시작하지 않습니다.

어떤 이유로 내 xmonad 구성이 xmobar를 시작하지 않지만 오류가 발생하지 않으며 명령이 xmobar정상적으로 시작됩니다. 이 내 꺼야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
         }