From 892ab356128e9670031a607ea93cd86bbf1ab074 Mon Sep 17 00:00:00 2001
From: Hektor Misplon <hektor.misplon@pm.me>
Date: Sun, 28 Jan 2024 20:26:46 +0100
Subject: [PATCH] Update key bindings

---
 .xmonad/xmonad.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index 7edb3c6..bc9d1b1 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -196,7 +196,10 @@ myKeys =
     ("M-S-<XF86MonBrightnessDown>", resetTemp), --
     ("M-S-b", fullscreenBrowser),
     ("<XF86Calculator>", spawnCalculator),
-    ("<XF86PowerOff>", spawn "systemctl suspend") --TODO: Only enable this on laptop
+    ("<XF86PowerOff>", spawn "systemctl suspend"), --TODO: Only enable this on laptop
+    ("M-c", windows copyToAll),
+    ("M-S-c", killAllOtherCopies),
+    ("M-S-<Delete>", kill)
   ] ++
   [ (m ++ k, windows $ f w) |
     (m, f) <- zip ["M-", "M-S-"]
@@ -205,9 +208,6 @@ myKeys =
                                 (withScreen 1 myWorkspaces)
                          ++ zip mySharedWorkspaceKeys
                                 (withScreen 2 mySharedWorkspaces)
-    ("M-c", windows copyToAll),
-    ("M-S-c", killAllOtherCopies),
-    ("M-S-<Delete>", kill)
   ]
 
 zipKeyPrefixes :: [String] -> [String] -> [String]