[xmonad] xmonad.hs to update

[Gauthier Östervall]

> display the last used workspace screen.

I have this problem on new installations, until I remember I forgot to
install `feh`. What

Also, I share the same shame :)


On Sun, Oct 3, 2021, 14:33 Platon Pronko <platon7pronko at gmail.com> wrote:

> 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
> _______________________________________________
> xmonad mailing list
> xmonad at haskell.org
> http://mail.haskell.org/cgi-bin/mailman/listinfo/xmonad
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/xmonad/attachments/20211003/6d482505/attachment.html>