diff --git a/xmonad.hs b/xmonad.hs index eea9d18..ff46939 100755 --- a/xmonad.hs +++ b/xmonad.hs @@ -5,6 +5,7 @@ import XMonad.Config.Desktop -- Actions import XMonad.Actions.CycleWS import XMonad.Actions.DynamicWorkspaces as DW +import XMonad.Actions.GridSelect import XMonad.Actions.OnScreen import XMonad.Actions.SpawnOn import XMonad.Actions.UpdatePointer @@ -253,7 +254,7 @@ main = do myStartup :: X () myStartup = do - setWMName "LG3D" + --setWMName "LG3D" toggleHomeScreens spawn "trayer --edge top --align right --widthtype request --margin 318 --expand false --align right --SetDockType true --SetPartialStrut false --tint 0x000000 --transparent true --alpha 0 --height 24 --monitor 'primary'" --spawn "gnome-gmail-notifier" @@ -409,6 +410,7 @@ myKeys = [ , ((winKey , xK_k), windows W.focusUp) -- explicitly setting the default , ((winKey .|. controlMask, xK_k), windows W.swapUp) -- explicitly setting the default , ((lAlt , xK_Tab), windows W.focusDown) -- replicating MS Windows task switcher behavior + , ((winKey , xK_Tab), goToSelected defaultGSConfig) , ((lAlt .|. shiftMask, xK_Tab), windows W.focusUp) -- replicating MS Windows task switcher behavior , ((winKey .|. controlMask, xK_Return), windows W.swapMaster) , ((winKey, xK_space ), sendMessage NextLayout)