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
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@haskell.org http://mail.haskell.org/cgi-bin/mailman/listinfo/xmonad
-- brandon s allbery kf8nh allbery.b@gmail.com