vanadium/xmonad: use <> instead of <+>

<+> is synonym of infix mappend.
Mappend is redundant and has the default implementation
mappend = (<>) since base-4.11.0.0. Should it be implemented manually,
since mappend is a synonym for (<>), it is expected that the two
functions are defined the same way. In a future GHC release mappend will
be removed from Monoid.
This commit is contained in:
Primrose 2025-08-25 23:07:45 +08:00
parent b97942e459
commit d4fa0b8bb6
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA

View file

@ -62,7 +62,7 @@ main =
]
in
fadeWindowsLogHook fadeHook
<+> refocusLastLogHook
<> refocusLastLogHook
, startupHook = do
spawnOnce "fcitx5 &" -- Input method
@ -104,7 +104,7 @@ main =
, namedScratchpadManageHook myScratchpads
]
<+>
<>
composeOne
[ className =? "firefox" -?> insertPosition Above Newer
, className =? "sioyek" -?> insertPosition Below Older