<div dir="ltr"><div dir="ltr">If you're running a newer version, you need more than just avoidStruts and manageDocks. The docks combinator in more recent versions has all the necessary hooks.<div><br></div><div><a href="http://hackage.haskell.org/package/xmonad-contrib-0.15/docs/XMonad-Hooks-ManageDocks.html#v:docks">http://hackage.haskell.org/package/xmonad-contrib-0.15/docs/XMonad-Hooks-ManageDocks.html#v:docks</a><br></div><div><br></div><div>Note new docksStartupHook, and that docksEventHook is now required. (In older versions only the xfce4 and KDE panels required it.) "docks" handles this for you and is preferred.</div></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Sun, May 12, 2019 at 10:01 AM Alain Bertrand <<a href="mailto:alainbe@free.fr">alainbe@free.fr</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Hello,<br>
<br>
I have been running xmonad for years on my desktop (Debian 7, then 8 and<br>
9) and I am highly satisfied: this is the only one that prevents me to<br>
"try another thing"!<br>
<br>
On my laptop (ubuntu 18.04), the windows overlap the task bar though I<br>
use exactly the same xmonad.hs file as I do on my desktop.<br>
<br>
Could you help me ?<br>
<br>
TIA<br>
<br>
Alain<br>
<br>
<br>
 import XMonad<br>
 import XMonad.Hooks.SetWMName<br>
 import XMonad.Hooks.ManageDocks<br>
 import qualified Data.Map as M<br>
 import Graphics.X11.Xlib<br>
 import XMonad.Config.Azerty<br>
 import XMonad.Prompt<br>
 import XMonad.Prompt.Shell<br>
 import XMonad.Prompt.XMonad<br>
 import XMonad.Actions.SpawnOn<br>
<br>
 myStartUpHook :: X ()<br>
 myStartUpHook = do<br>
        spawnOn "panel" "xfce4-panel"<br>
        setWMName "LG3D"<br>
<br>
<br>
 main=do<br>
   xmonad azertyConfig<br>
     {<br>
     layoutHook=avoidStruts $ layoutHook defaultConfig<br>
     , manageHook=manageHook defaultConfig <+> manageDocks<br>
     , modMask = mod4Mask<br>
     , keys = myKeys <+> keys azertyConfig<br>
     , startupHook = myStartUpHook<br>
     }<br>
<br>
<br>
<br>
<br>
-- main=do<br>
-- xmonad { keys = myKeys <+> keys azertyConfig }<br>
--     {<br>
--     layoutHook=avoidStruts $ layoutHook defaultConfig<br>
--     , manageHook=manageHook defaultConfig <+> manageDocks<br>
--     , startupHook = setWMName "LG3D"<br>
--     }<br>
--<br>
--<br>
 myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList<br>
             [ ((modm, xK_F12), xmonadPrompt defaultXPConfig)<br>
             , ((modm, xK_F3 ), shellPrompt  defaultXPConfig)<br>
             ]<br>
<br>
_______________________________________________<br>
xmonad mailing list<br>
<a href="mailto:xmonad@haskell.org" target="_blank">xmonad@haskell.org</a><br>
<a href="http://mail.haskell.org/cgi-bin/mailman/listinfo/xmonad" rel="noreferrer" target="_blank">http://mail.haskell.org/cgi-bin/mailman/listinfo/xmonad</a><br>
</blockquote></div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div>brandon s allbery kf8nh</div><div><a href="mailto:allbery.b@gmail.com" target="_blank">allbery.b@gmail.com</a></div></div></div></div></div>