From 9966232c4783ced43f891752a7898f5541b5c6e8 Mon Sep 17 00:00:00 2001
From: jasmine <its.jassy@pm.me>
Date: Mon, 19 May 2025 11:00:55 +0800
Subject: [PATCH] update keymap

---
 src/xmonad.hs | 41 ++++++++++++++++++++++-------------------
 1 file changed, 22 insertions(+), 19 deletions(-)

diff --git a/src/xmonad.hs b/src/xmonad.hs
index d3d3212..81965bf 100644
--- a/src/xmonad.hs
+++ b/src/xmonad.hs
@@ -76,14 +76,13 @@ myKeymap =
     --
 
     -- spawning programs
-    [ ("M-<Space> s t", spawn myTerminal   )
-    , ("M-<Space> s d", spawn myLauncher   )
-    , ("M-<Space> s f", spawn myFileManager)
-    , ("M-<Space> s s", spawn myScrot      )
+    [ ("M-<Space> <Return>", spawn myTerminal   )
+    , ("M-<Space> s d"     , spawn myLauncher   )
+    , ("M-<Space> s f"     , spawn myFileManager)
+    , ("M-<Space> s s"     , spawn myScrot      )
 
-    -- kill/exit
-    , ("M-<Space> c", kill          )
-    , ("M-<Space> q", io exitSuccess)
+    -- quit window
+    , ("M-<Space> q", kill)
 
     -- focus master window
     , ("M-<Space> <Backspace>", windows W.focusMaster)
@@ -118,6 +117,10 @@ myKeymap =
     , ("M-4", windows $ W.greedyView "games")
     , ("M-5", windows $ W.greedyView "misc" )
 
+    -- cycle workspaces
+    , ("M-<Page_Up>"  , prevWS)
+    , ("M-<Page_Down>", nextWS)
+
     -- send window to workspace
     , ("M-S-1", windows $ W.shift "code" )
     , ("M-S-2", windows $ W.shift "chat" )
@@ -177,24 +180,24 @@ editMode = mode "edit" $ mkKeysEz
     --
 
     -- expand windows
-    , ("M1-o", sendMessage $ ExpandTowardsBy U 0.01)
-    , ("M1-n", sendMessage $ ExpandTowardsBy L 0.01)
-    , ("M1-e", sendMessage $ ExpandTowardsBy D 0.01)
-    , ("M1-i", sendMessage $ ExpandTowardsBy R 0.01)
+    , ("M-o", sendMessage $ ExpandTowardsBy U 0.01)
+    , ("M-n", sendMessage $ ExpandTowardsBy L 0.01)
+    , ("M-e", sendMessage $ ExpandTowardsBy D 0.01)
+    , ("M-i", sendMessage $ ExpandTowardsBy R 0.01)
 
     -- shrink windows
-    , ("M1-C-o", sendMessage $ ShrinkFromBy U 0.01)
-    , ("M1-C-n", sendMessage $ ShrinkFromBy L 0.01)
-    , ("M1-C-e", sendMessage $ ShrinkFromBy D 0.01)
-    , ("M1-C-i", sendMessage $ ShrinkFromBy R 0.01)
+    , ("M-S-o", sendMessage $ ShrinkFromBy U 0.01)
+    , ("M-S-n", sendMessage $ ShrinkFromBy L 0.01)
+    , ("M-S-e", sendMessage $ ShrinkFromBy D 0.01)
+    , ("M-S-i", sendMessage $ ShrinkFromBy R 0.01)
 
     -- swap/rotate
-    , ("M1-r", sendMessage Rotate)
-    , ("M1-s", sendMessage Swap  )
+    , ("M-r", sendMessage Rotate)
+    , ("M-s", sendMessage Swap  )
 
     -- split shift
-    , ("M1-f", sendMessage $ SplitShift Prev)
-    , ("M1-u", sendMessage $ SplitShift Next)
+    , ("M-f", sendMessage $ SplitShift Prev)
+    , ("M-u", sendMessage $ SplitShift Next)
     ]