From 55e1adde4c228be5a6311aef994b81c9824bb9b0 Mon Sep 17 00:00:00 2001
From: brandon s allbery kf8nh <allbery.b@gmail.com>
Date: Sat, 11 Jan 2025 23:32:39 -0500
Subject: [PATCH] add XF86WLAN special key

---
 CHANGES.md              | 4 ++++
 XMonad/Prelude.hs       | 1 +
 XMonad/Util/EZConfig.hs | 1 +
 3 files changed, 6 insertions(+)

diff --git a/CHANGES.md b/CHANGES.md
index 16c903bd..fcb6b230 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -4,6 +4,10 @@
 
 ### Bug Fixes and Minor Changes
 
+  * `XMonad.Util.EZConfig`
+
+    - Added `XF86WLAN` to the list of supported special keys.
+
   * `XMonad.Actions.DynamicProjects`
 
     - No longer autodelete projects when `switchProject` is called from
diff --git a/XMonad/Prelude.hs b/XMonad/Prelude.hs
index 21d0a4f5..fa9ea7f4 100644
--- a/XMonad/Prelude.hs
+++ b/XMonad/Prelude.hs
@@ -472,6 +472,7 @@ multimediaKeys = filter ((/= noSymbol) . snd) . map (id &&& stringToKeysym) $
   , "XF86_Next_VMode"
   , "XF86_Prev_VMode"
   , "XF86Bluetooth"
+  , "XF86WLAN"
   ]
 
 -- | The specialized 'W.Screen' derived from 'WindowSet'.
diff --git a/XMonad/Util/EZConfig.hs b/XMonad/Util/EZConfig.hs
index 1b3aa369..4c0394d5 100644
--- a/XMonad/Util/EZConfig.hs
+++ b/XMonad/Util/EZConfig.hs
@@ -419,6 +419,7 @@ infixl 4 `removeMouseBindings`
 -- > <XF86_Next_VMode>
 -- > <XF86_Prev_VMode>
 -- > <XF86Bluetooth>
+-- > <XF86WLAN>
 
 mkKeymap :: XConfig l -> [(String, X ())] -> M.Map (KeyMask, KeySym) (X ())
 mkKeymap c = M.fromList . mkSubmaps . readKeymap c