[xmonad] darcs patch: add 'userCode' wrapper to startupHook