[xmonad] Correct config file for xmonad 0.15

[Alain Bertrand]

Hi,

I have installed Lubuntu 20.04 on my laptop and xmonad doesn't redraw it 
background. That is if I am on workspace 1 , and switch to a workspace 
with no window, the background of the new workspace is made by the 
windows of workspace  1.

I do have some warnings  in xmonad.errors but  don't feel they are the 
explanation of the problem I encounter.

Would somebody have a workaround ? Not being able to use Xmonad would be 
hard to bear.

Best regards,

Alain

--------------------------

xmonad.hs:25:42: warning: [-Wdeprecations]
     In the use of ‘defaultConfig’
     (imported from XMonad, but defined in XMonad.Config):
     Deprecated: "Use def (from Data.Default, and re-exported by XMonad 
and XMonad.Config) instead."
    |
25 |      layoutHook=avoidStruts $ layoutHook defaultConfig
    |                                          ^^^^^^^^^^^^^

xmonad.hs:26:30: warning: [-Wdeprecations]
     In the use of ‘defaultConfig’
     (imported from XMonad, but defined in XMonad.Config):
     Deprecated: "Use def (from Data.Default, and re-exported by XMonad 
and XMonad.Config) instead."
    |
26 |      , manageHook=manageHook defaultConfig <+> manageDocks
    |                              ^^^^^^^^^^^^^

xmonad.hs:43:46: warning: [-Wdeprecations]
     In the use of ‘defaultXPConfig’ (imported from XMonad.Prompt):
     Deprecated: "Use def (from Data.Default, and re-exported from 
XMonad.Prompt) instead."
    |
43 |              [ ((modm, xK_F12), xmonadPrompt defaultXPConfig)
    |                                              ^^^^^^^^^^^^^^^

xmonad.hs:44:46: warning: [-Wdeprecations]
     In the use of ‘defaultXPConfig’ (imported from XMonad.Prompt):
     Deprecated: "Use def (from Data.Default, and re-exported from 
XMonad.Prompt) instead."
    |
44 |              , ((modm, xK_F3 ), shellPrompt  defaultXPConfig)
    |                                              ^^^^^^^^^^^^^^^


My config file is :

  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"
         spawnOn "workspace7" "/usr/bin/transmission-gtk"
         setWMName "LG3D"


  main=do
    xmonad  $ docks def
      {
      layoutHook=avoidStruts $ layoutHook defaultConfig
      , manageHook=manageHook defaultConfig <+> manageDocks
      , modMask = mod4Mask
      , keys = myKeys <+> keys azertyConfig
      , startupHook = myStartUpHook
      }


  myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList
              [ ((modm, xK_F12), xmonadPrompt defaultXPConfig)
              , ((modm, xK_F3 ), shellPrompt  defaultXPConfig)
              ]