Switching screens in XMonad requires a Screen Comparator now

This commit is contained in:
Daniel - 2019-12-18 16:43:49 +01:00
parent f1283a2bac
commit e34a3bd88a
No known key found for this signature in database
GPG Key ID: 1C7071A75BB72D64
1 changed files with 5 additions and 4 deletions

View File

@ -7,6 +7,7 @@ module Main where
import System.Exit (exitSuccess)
import Data.Map (Map)
import Data.Default (def)
import XMonad hiding ((|||))
@ -82,10 +83,10 @@ keyMap c = mkKeymap c $
, ("M-h" , sendMessage Shrink)
, ("M-i" , sendMessage Expand)
, ("M-v" , spawn "xwit -current -warp 10000 10000") -- move cursor away
, ("M-," , viewScreen 0)
, ("M-." , viewScreen 1)
, ("M-S-," , sendToScreen 0)
, ("M-S-." , sendToScreen 1)
, ("M-," , viewScreen def 0)
, ("M-." , viewScreen def 1)
, ("M-S-," , sendToScreen def 0)
, ("M-S-." , sendToScreen def 1)
, ("<XF86ScreenSaver>" , spawn "xtrlock")
]
++