forked from colonelpanic/dotfiles
[XMonad] Update pointer position when changing focus with keyboard
This commit is contained in:
parent
49664650f6
commit
fa36276f63
@ -24,6 +24,7 @@ import XMonad.Actions.CycleWS hiding (nextScreen)
|
|||||||
import qualified XMonad.Actions.DynamicWorkspaceOrder as DWO
|
import qualified XMonad.Actions.DynamicWorkspaceOrder as DWO
|
||||||
import XMonad.Actions.DynamicWorkspaces hiding (withWorkspace)
|
import XMonad.Actions.DynamicWorkspaces hiding (withWorkspace)
|
||||||
import XMonad.Actions.Minimize
|
import XMonad.Actions.Minimize
|
||||||
|
import XMonad.Actions.UpdatePointer
|
||||||
import XMonad.Actions.WindowBringer
|
import XMonad.Actions.WindowBringer
|
||||||
import XMonad.Actions.WindowGo
|
import XMonad.Actions.WindowGo
|
||||||
import XMonad.Actions.WorkspaceNames
|
import XMonad.Actions.WorkspaceNames
|
||||||
@ -64,7 +65,7 @@ main =
|
|||||||
, manageHook = myManageHook <+> manageHook def
|
, manageHook = myManageHook <+> manageHook def
|
||||||
, layoutHook = myLayoutHook
|
, layoutHook = myLayoutHook
|
||||||
, logHook =
|
, logHook =
|
||||||
toggleFadeInactiveLogHook 0.9 +++
|
updatePointer (0.5, 0.5) (0, 0) +++ toggleFadeInactiveLogHook 0.9 +++
|
||||||
ewmhWorkspaceNamesLogHook' myGetWorkspaceNameFromTag +++
|
ewmhWorkspaceNamesLogHook' myGetWorkspaceNameFromTag +++
|
||||||
(myGetWorkspaceNameFromTag <$> getWorkspaceNames' >>= pagerHintsLogHookCustom)
|
(myGetWorkspaceNameFromTag <$> getWorkspaceNames' >>= pagerHintsLogHookCustom)
|
||||||
, handleEventHook = fullscreenEventHook +++
|
, handleEventHook = fullscreenEventHook +++
|
||||||
|
Loading…
Reference in New Issue
Block a user