hektor/dots
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Update 'shiftAndView'

Browse Source
This commit is contained in:
Hektor Misplon
2024-01-03 19:39:15 +01:00
parent 2e29cb8292
commit 2793ac2349
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
.xmonad/xmonad.hs
View File

@@ -3,6 +3,7 @@
import XMonad import XMonad
import XMonad.Actions.CopyWindow (copyToAll, killAllOtherCopies) import XMonad.Actions.CopyWindow (copyToAll, killAllOtherCopies)
import XMonad.Actions.FloatSnap import XMonad.Actions.FloatSnap
import Control.Monad (liftM2)
import XMonad.Hooks.DynamicProperty import XMonad.Hooks.DynamicProperty
import XMonad.Hooks.EwmhDesktops import XMonad.Hooks.EwmhDesktops
import XMonad.Hooks.ManageDocks import XMonad.Hooks.ManageDocks
@@ -60,7 +61,7 @@ pp =
-- Workspaces & screens {{{ -- Workspaces & screens {{{
-- Shift to workspace and view workspace -- Shift to workspace and view workspace
shiftAndView id = doF (W.view id) <> doF (W.shift id) shiftAndView = doF . liftM2 (.) W.greedyView W.shift
-- }}} -- }}}