diff options
| author | Adrian Kummerlaender | 2023-04-26 14:19:33 +0200 |
|---|---|---|
| committer | Adrian Kummerlaender | 2023-04-26 14:19:33 +0200 |
| commit | 1a73a1dc65d6a22b238c4b3baedaac20da17c5a4 (patch) | |
| tree | 0bf15a393c225254c301231dcea17febd8c006a1 /gui/conf/xmonad.hs | |
| parent | 22908007695dcfd41a98b0410ef858639e368720 (diff) | |
| download | nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.tar nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.tar.gz nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.tar.bz2 nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.tar.lz nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.tar.xz nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.tar.zst nixos_home-1a73a1dc65d6a22b238c4b3baedaac20da17c5a4.zip | |
Add keybinding for switching between physical screens
Diffstat (limited to 'gui/conf/xmonad.hs')
| -rw-r--r-- | gui/conf/xmonad.hs | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs index 31fce88..65c2d13 100644 --- a/gui/conf/xmonad.hs +++ b/gui/conf/xmonad.hs @@ -17,6 +17,8 @@ import XMonad.Layout.Grid import XMonad.Layout.Groups.Examples import XMonad.Layout.Groups.Helpers +import XMonad.Actions.PhysicalScreens + import XMonad.Layout.NoBorders import XMonad.Layout.Reflect import XMonad.Layout.MultiToggle @@ -214,13 +216,15 @@ commonKeybindings host = [ ("C-<Backspace>" , toggleWS' ["NSP"]) -- workspace movement - , ("M-s j" , moveTo Next nonEmptyWS) - , ("M-s k" , moveTo Prev nonEmptyWS) - , ("M-S-s j" , shiftTo Next nonEmptyWS >> moveTo Next nonEmptyWS) - , ("M-S-s k" , shiftTo Prev nonEmptyWS >> moveTo Prev nonEmptyWS) + , ("M-s j" , moveTo Next nonEmptyWS) + , ("M-s k" , moveTo Prev nonEmptyWS) + , ("M-S-s j" , shiftTo Next nonEmptyWS >> moveTo Next nonEmptyWS) + , ("M-S-s k" , shiftTo Prev nonEmptyWS >> moveTo Prev nonEmptyWS) + +-- physical screen change + , ("M-<Tab>" , nextScreen) -- workspace layout management - , ("M-y" , refresh) , ("M-v" , layoutMenu) , ("M-s l" , sendMessage NextLayout) , ("M-s +" , sendMessage $ IncMasterN 1) |