primrose/.files
1
0
Fork 0
mirror of https://codeberg.org/leana8959/.files.git synced 2025-12-07 07:09:15 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

xmonad: binding for workspaces swapping

Browse source
This commit is contained in:
Primrose 2024-10-23 22:00:11 +02:00
parent cc158cdcaa
commit 3d74c502a8
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
.config/xmonad/xmonad.hs
View file

@ -4,6 +4,7 @@ import XMonad hiding (tile)
import XMonad.Actions.PerWindowKeys (bindFirst) import XMonad.Actions.PerWindowKeys (bindFirst)
import XMonad.Actions.SpawnOn (spawnOn) import XMonad.Actions.SpawnOn (spawnOn)
import XMonad.Actions.SwapWorkspaces(swapWithCurrent)
import XMonad.Util.EZConfig (additionalKeys, removeKeys) import XMonad.Util.EZConfig (additionalKeys, removeKeys)
import XMonad.Util.NamedScratchpad (NamedScratchpad (NS), import XMonad.Util.NamedScratchpad (NamedScratchpad (NS),
@ -263,6 +264,10 @@ myKeymaps =
++ [ ((myMod .|. mod1Mask, n), windows $ W.shift space) ++ [ ((myMod .|. mod1Mask, n), windows $ W.shift space)
| (n, space) <- zip workspaceKeys myWorkspaces ] | (n, space) <- zip workspaceKeys myWorkspaces ]
-- organic work spacing swapping
++ [ ((myMod .|. controlMask, n), windows $ swapWithCurrent space)
| (n, space) <- zip workspaceKeys myWorkspaces]
-- Force autorandr to change profile -- Force autorandr to change profile
++ let ++ let
restartAutorandr = spawn "autorandr --ignore-lid --change" restartAutorandr = spawn "autorandr --ignore-lid --change"