[xmonad] xmonad.hs to update

[Platon Pronko]

Hi!

Does it still compile sucessfully? (check with `xmonad --recompile`)
Does it start at all? (check with `ps -ef | grep xmonad`)

Your description sounds like window manager failed to start completely.

Best regards,
Platon Pronko

On 2021-10-02 11:15, Alain Bertrand wrote:
> Hi,
> 
> On Debian 11, the following xmonad.hs seems not to work anymore.
> 
> Cursor is changed to a cross and empty workspaces display the last used workspace screen.
> 
> Moreover, I would like to add the spiral layout which seems to be so great. I feel a little bit ashamed that after all these years using Xmonad, I still can't configure it by myself but in fact it breaks so rarely that there is no point in tinkering with it.
> 
> Thanks in advance.
> 
> 
> Alain
> 
> import XMonad
>   import XMonad.Hooks.SetWMName
>   import XMonad.Hooks.ManageDocks
>   import qualified Data.Map as M
>   import Graphics.X11.Xlib
>   import XMonad.Config.Azerty
>   import XMonad.Prompt
>   import XMonad.Prompt.Shell
>   import XMonad.Prompt.XMonad
>   import XMonad.Actions.SpawnOn
> 
>   myStartUpHook :: X ()
>   myStartUpHook = do
>          spawnOn "panel" "xfce4-panel"
>          spawnOn "clavier" "/home/alain/bin/clavier_conf"
>          spawnOn "1" "/usr/bin/firefox"
>          spawnOn "1" "/usr/bin/thunderbird"
>          setWMName "LG3D"
> 
> 
>   main=do
>     xmonad  $ docks def
>       {
>       layoutHook=avoidStruts $ layoutHook defaultConfig
>       , manageHook=manageHook defaultConfig <+> manageDocks
>       , modMask = mod4Mask
>       , keys = myKeys <+> keys azertyConfig
>       , startupHook = myStartUpHook
>       }
> 
> 
> -- main=do
> -- xmonad { keys = myKeys <+> keys azertyConfig }
> --     {
> --     layoutHook=avoidStruts $ layoutHook defaultConfig
> --     , manageHook=manageHook defaultConfig <+> manageDocks
> --     , startupHook = setWMName "LG3D"
> --     }
> -- 
> -- 
>   myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList
>               [ ((modm, xK_F12), xmonadPrompt defaultXPConfig)
>               , ((modm, xK_F3 ), shellPrompt  defaultXPConfig)
>               ]
> 
> _______________________________________________
> xmonad mailing list
> xmonad at haskell.org
> http://mail.haskell.org/cgi-bin/mailman/listinfo/xmonad