如何为每个屏幕生成XMobar实例？

Question

This question有一个合适的答案，但它隐藏了我发现困难的所有在"spawn“评论中的东西。

• 如何为不同的屏幕生成xmobar的一个实例？
• 如果这不是一个选项，如何在多个屏幕上生成多个实例？
• 如何使用xmobar的多个实例设置logHook？

Answer 1

例如，类似这样的事情：

import XMonad
import XMonad.Util.Run
import XMonad.Layout.IndependentScreens

main = do
    n <- countScreens
    xmprocs <- mapM (\i -> spawnPipe $ "xmobar /home/biskulopty/.xmobarrc-" ++ show i ++ " -x " ++ show i) [0..n-1]
    xmonad def {
        logHook = {- use xmprocs, which is a list of pipes of type [Handle] -}
    }