From 10c23160e041ebaab0aa246a2c6525208893c787 Mon Sep 17 00:00:00 2001 From: jasmine Date: Sun, 11 May 2025 23:03:02 +0800 Subject: [PATCH] update keymap --- src/xmonad.hs | 23 +++++------------------ 1 file changed, 5 insertions(+), 18 deletions(-) diff --git a/src/xmonad.hs b/src/xmonad.hs index 2c68297..9d6fcd1 100644 --- a/src/xmonad.hs +++ b/src/xmonad.hs @@ -76,29 +76,16 @@ myKeymap = -- spawning programs [ ("M-a s t", spawn myTerminal ) - , ("M-a s d", spawn myLauncher ) + , ("M-a s l", spawn myLauncher ) , ("M-a s f", spawn myFileManager) , ("M-a s s", spawn myScrot ) -- kill/exit - , ("M-a s c", kill ) - , ("M-a s q", io exitSuccess) - - -- directional navigation of windows - , ("M-a g o", windowGo U False) - , ("M-a g n", windowGo L False) - , ("M-a g e", windowGo D False) - , ("M-a g i", windowGo R False) - - -- switch workspaces - , ("M-a g j", windows $ W.greedyView "code" ) - , ("M-a g v", windows $ W.greedyView "chat" ) - , ("M-a g d", windows $ W.greedyView "web" ) - , ("M-a g r", windows $ W.greedyView "games") - , ("M-a g s", windows $ W.greedyView "misc" ) + , ("M-a c", kill ) + , ("M-a q", io exitSuccess) -- focus master window - , ("M-a g m", windows W.focusMaster) + , ("M-a ", windows W.focusMaster) -- toggling layouts , ("M-a j t", sendMessage $ JumpToLayout "dynamic tiling" ) @@ -236,7 +223,7 @@ myXmobarPP = def , ppHiddenNoWindows = grey0 . wrap " " "" , ppUrgent = red . wrap " " "" , ppLayout = aqua . wrap (grey0 " [ ") (grey0 " ] ") - , ppOrder = \[ws, l, _] -> [ws, l] + , ppOrder = \[ws, l, _, mode] -> [ws, l, mode] , ppExtras = [logMode] }