[xmonad] New warnings

[Brandon Allbery]

It told you how, use `def` instead of `defaultConfig`. It sounds like you
have been using your Linux distribution's package, and they have just
updated to 0.18.

On Mon, Jun 24, 2024 at 3:45 PM Alain Bertrand <alainbe at free.fr> wrote:

> Hi all,
>
> I don't know why but suddenly, xmonad decided to recompile itself and I
> got warnings :
>
> Deprecations detected while compiling xmonad config:
> /home/alain/.xmonad/xmonad.hs
> $ ghc --make xmonad.hs -i -ilib -fforce-recomp -main-is main -v0
> -outputdir /home/alain/.xmonad/build-x86_64-linux -o
> /home/alain/.xmonad/xmonad-x86_64-linux
>
> xmonad.hs:16:1: warning: [-Wtabs]
>      Tab character found here, and in one further location.
>      Suggested fix: Please use spaces instead.
>     |
> 16 |         spawnOn "bg" "feh --bg-tile
> /usr/share/WindowMaker/Backgrounds/BlueImage.jpeg"
>     | ^^^^^^^^
>
> xmonad.hs:35: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."
>     |
> 35 |      , manageHook=manageHook defaultConfig <+> manageDocks
>     |                              ^^^^^^^^^^^^^
>
> I don't find the tab character, if I delete what appears to me as a
> space, then type a space, I have another error message.
>
> How should I replace "defaultConfig" ?
>
>
> Thanks for your help.
>
>
> Alain
>
> import XMonad
>    1  import XMonad.Hooks.SetWMName
>    2  import XMonad.Hooks.ManageDocks
>    3  import qualified Data.Map as M
>    4  import Graphics.X11.Xlib
>    5  import XMonad.Config.Azerty
>    6  import XMonad.Prompt
>    7  import XMonad.Prompt.Shell
>    8  import XMonad.Prompt.XMonad
>    9  import XMonad.Actions.SpawnOn
>   10  import XMonad.Layout.Spiral
>   11  import XMonad.Layout.SimplestFloat
>   12  myStartUpHook :: X ()
>   13  myStartUpHook = do
>   14         spawnOn "panel" "xfce4-panel"
>   15   spawnOn "bg" "feh --bg-tile
> /usr/share/WindowMaker/Backgrounds/BlueImage.jpeg"
>   16
>   17 --        spawnOn "clavier" "/home/alain/bin/clavier_conf"
>   18 --        spawnOn "1" "/usr/bin/firefox"
>   19         spawnOn "1" "/usr/bin/thunderbird"
>   20 --        spawnOn "workspace7" "/usr/bin/transmission-gtk"
>   21 --  spawnOn "akonadi" "akonadictl start"
>   22     setWMName "LG3D"
>   23
>   24
>   25  --myLayoutHook = avoidStruts  ( Full ||| spiral (6/7)  ||| Tall 1
> 0.03 0.5 ||| simplestFloat)
>   26
>   27      -- sets default tile as: Tall nmaster (delta) (golden ratio)
>   28 --
>   29 --
>   30 main=do
>   31    xmonad  $ docks def
>   32 {
>   33      layoutHook = avoidStruts $ (spiral (6/7) ||| layoutHook def
> ||| simplestFloat  )
>   34      , manageHook=manageHook defaultConfig <+> manageDocks
>   35      , modMask = mod4Mask
>   36      , keys = myKeys <+> keys azertyConfig
>   37      , startupHook = myStartUpHook
>   38 }
>   39
>   40
>   41 -- main=do
>   42 -- xmonad { keys = myKeys <+> keys azertyConfig }
>   43 -- {
>   44 --     layoutHook=avoidStruts $ layoutHook defaultConfig
>   45 --     , manageHook=manageHook defaultConfig <+> manageDocks
>   46 --     , startupHook = setWMName "LG3D"
>   47 -- }
>   48 --
>   49 --
>   50  myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList
>   51              [ ((modm, xK_F12), xmonadPrompt def)
>   52              , ((modm, xK_F3 ), shellPrompt def)
>   53 ]
> ~
>
> _______________________________________________
> xmonad mailing list
> xmonad at haskell.org
> http://mail.haskell.org/cgi-bin/mailman/listinfo/xmonad
>


-- 
brandon s allbery kf8nh
allbery.b at gmail.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/xmonad/attachments/20240624/e5de8ee8/attachment.html>