XFCE pager/window list only follow first spawned widnow, Xmonad

Question

I'm using XFCE 4.8, with xmonad and xmonad-contrib 0.9.2-1.2
I'm currently trying to get Xmonad to use the window list and pager from XFCE at the same time, while outputting to dzen2.  When I spawn a window, it only tracks the first window's size in the pager, and still thinks I'm on the workspace it originally spawned on (see blue square in the bottom left of the screenshot).
My current xmonad.hs:
import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
import XMonad.Actions.DwmPromote
import XMonad.Hooks.SetWMName
import XMonad.Hooks.EwmhDesktops
import XMonad.Config.Xfce
myManageHook = composeAll
[ className =? "milkytracker" --> doShift "etc"
, className =? "net-minecraft-MinecraftLauncher" --> doShift "etc"
, className =? "prboom-plus" --> doShift "etc"
, className =? "Chromium" --> doShift "web"
, className =? "Deadbeef" --> doFloat <+> doShift "media"
main = do
xmproc <- spawnPipe "/usr/bin/dzen2 -bg '#303030' -fg '#a1a1a1' -h '16' -w 480 -x '0' -y '0' -ta 'l' -fn '-*-terminus-*-*-*-*-*-*-*-*-*-*-*-*'"
xmonad $ ewmh xfceConfig {
manageHook = manageDocks <+> manageHook defaultConfig <+> myManageHook
, layoutHook = avoidStruts $ layoutHook defaultConfig
, startupHook = setWMName "LG3D"
, logHook = dynamicLogWithPP $ dzenPP {
ppOutput = hPutStrLn xmproc
, ppCurrent = dzenColor "#c0c0c0" "#303030"
, ppHidden = dzenColor "#a1a1f1" "#303030"
, ppTitle = dzenColor "#c0c0c0" "#303030"
, ppHiddenNoWindows = dzenColor "#7f7f7f" "#303030"
, ppSep = " | "
, ppWsSep = " "
, ppLayout = \x -> case x of
"Tall" -> "[|-]"
"Mirror Tall" -> "[--]"
"Full" -> "[ ]"
, modMask = mod4Mask
, terminal = "urxvtc"
, workspaces = ["term", "web", "media", "etc"]
, normalBorderColor = "#303030"
, focusedBorderColor = "#a1a1a1"
} `additionalKeys`
[ ((mod4Mask, xK_b), sendMessage ToggleStruts)
, ((mod4Mask, xK_p), spawn "dmenu_run -nb '#303030' -nf '#a1a1a1' -sb '#a1a1a1' -sf '#303030' -fn '-*-terminus-*-*-*-*-*-*-*-*-*-*-*-*'")
, ((mod4Mask, xK_Return), spawn "urxvtc")
, ((mod4Mask .|. shiftMask, xK_Return), dwmpromote)
, ((0, 0x1008ff13), spawn "amixer set Master 1+")
, ((0, 0x1008ff11), spawn "amixer set Master 1-")
, ((0, 0x1008ff12), spawn "amixer set Master toggle")
, ((mod4Mask, xK_w), spawn "xfdesktop --menu" )
I'm rather confused about this, as I'm not sure if I'm supposed to use ewmhDesktopsLogHook, or use a startupHook for this, or an eventHandler for this sort of thing.  I tried following this guide from Haskell's wiki, but it didn't work as expected, so I struck out on my own.
EDIT:  I tested in my Debian Wheezy install, it works fine with XFCE 4.6.  I have a hunch it might have something to do with xmonad-contrib not supporting newer versions of XFCE/LXDE  properly.
Last edited by arinlares (2011-04-17 00:23:59)

Answer 1

I'm using XFCE 4.8, with xmonad and xmonad-contrib 0.9.2-1.2
I'm currently trying to get Xmonad to use the window list and pager from XFCE at the same time, while outputting to dzen2.  When I spawn a window, it only tracks the first window's size in the pager, and still thinks I'm on the workspace it originally spawned on (see blue square in the bottom left of the screenshot).
My current xmonad.hs:
import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
import XMonad.Actions.DwmPromote
import XMonad.Hooks.SetWMName
import XMonad.Hooks.EwmhDesktops
import XMonad.Config.Xfce
myManageHook = composeAll
[ className =? "milkytracker" --> doShift "etc"
, className =? "net-minecraft-MinecraftLauncher" --> doShift "etc"
, className =? "prboom-plus" --> doShift "etc"
, className =? "Chromium" --> doShift "web"
, className =? "Deadbeef" --> doFloat <+> doShift "media"
main = do
xmproc <- spawnPipe "/usr/bin/dzen2 -bg '#303030' -fg '#a1a1a1' -h '16' -w 480 -x '0' -y '0' -ta 'l' -fn '-*-terminus-*-*-*-*-*-*-*-*-*-*-*-*'"
xmonad $ ewmh xfceConfig {
manageHook = manageDocks <+> manageHook defaultConfig <+> myManageHook
, layoutHook = avoidStruts $ layoutHook defaultConfig
, startupHook = setWMName "LG3D"
, logHook = dynamicLogWithPP $ dzenPP {
ppOutput = hPutStrLn xmproc
, ppCurrent = dzenColor "#c0c0c0" "#303030"
, ppHidden = dzenColor "#a1a1f1" "#303030"
, ppTitle = dzenColor "#c0c0c0" "#303030"
, ppHiddenNoWindows = dzenColor "#7f7f7f" "#303030"
, ppSep = " | "
, ppWsSep = " "
, ppLayout = \x -> case x of
"Tall" -> "[|-]"
"Mirror Tall" -> "[--]"
"Full" -> "[ ]"
, modMask = mod4Mask
, terminal = "urxvtc"
, workspaces = ["term", "web", "media", "etc"]
, normalBorderColor = "#303030"
, focusedBorderColor = "#a1a1a1"
} `additionalKeys`
[ ((mod4Mask, xK_b), sendMessage ToggleStruts)
, ((mod4Mask, xK_p), spawn "dmenu_run -nb '#303030' -nf '#a1a1a1' -sb '#a1a1a1' -sf '#303030' -fn '-*-terminus-*-*-*-*-*-*-*-*-*-*-*-*'")
, ((mod4Mask, xK_Return), spawn "urxvtc")
, ((mod4Mask .|. shiftMask, xK_Return), dwmpromote)
, ((0, 0x1008ff13), spawn "amixer set Master 1+")
, ((0, 0x1008ff11), spawn "amixer set Master 1-")
, ((0, 0x1008ff12), spawn "amixer set Master toggle")
, ((mod4Mask, xK_w), spawn "xfdesktop --menu" )
I'm rather confused about this, as I'm not sure if I'm supposed to use ewmhDesktopsLogHook, or use a startupHook for this, or an eventHandler for this sort of thing.  I tried following this guide from Haskell's wiki, but it didn't work as expected, so I struck out on my own.
EDIT:  I tested in my Debian Wheezy install, it works fine with XFCE 4.6.  I have a hunch it might have something to do with xmonad-contrib not supporting newer versions of XFCE/LXDE  properly.
Last edited by arinlares (2011-04-17 00:23:59)