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

Question

This question有一个合适的答案，但它隐藏了我发现的所有内容很难找到的东西＆＃34;产生xmobar＆＃34;发表评论。
- 如何为不同的屏幕生成一个xmobar实例？
- 如果这不是一个选项，如何在多个屏幕上生成多个实例？ - 如何使用多个xmobar实例设置logHook？

Answer 1

e.g。像这样的东西：

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] -}
    }