update

WeissP · Nov 17, 2024 · 05afef7 · 05afef7
1 parent 52ca464
commit 05afef7
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 4 deletions.
diff --git a/src/TreeActions.hs b/src/TreeActions.hs
@@ -48,9 +48,9 @@ weissTreeActions =
     $ scratchpadActions
       <> [ Node
             (TSNode "System" "System operations" (return ()))
-            [ Node (TSNode "Shutdown" "Poweroff the system" (spawn " sudo shutdown now")) []
+            [ Node (TSNode "Suspend" "Suspend the system" (spawn "sudo systemctl suspend")) []
             , Node (TSNode "Reboot" "Reboot the system" (spawn "sudo reboot")) []
-            , Node (TSNode "Suspend" "Suspend the system" (spawn "sudo systemctl suspend")) []
+            , Node (TSNode "Shutdown" "Poweroff the system" (spawn " sudo shutdown now")) []
             ]
          ]
   where

diff --git a/src/WeissXMonad.hs b/src/WeissXMonad.hs
@@ -21,6 +21,7 @@ import XMonad.Actions.EasyMotion (EasyMotionConfig (..), selectWindow)
 import XMonad.Actions.GroupNavigation (historyHook)
 import XMonad.Actions.MouseResize
 import XMonad.Actions.ShowText (flashText, handleTimerEvent)
+import XMonad.Actions.UpdatePointer (updatePointer)
 import XMonad.Hooks.DynamicLog
 import XMonad.Hooks.DynamicProperty
 import XMonad.Hooks.EwmhDesktops
@@ -136,7 +137,7 @@ myKeys =
     -- , ("C-<Tab>"      , myFocusDown)
     -- , ("M-4"          , moveFloat $ namedScratchpadAction myScratchPads "tmux")
   ]
-    <> workspaceKeys 
+    <> workspaceKeys
     -- ++ [ ("M-4 " ++ key, fun)
     --    | (key, fun) <-
     --         [ ("v", spawnHereNamedScratchpadAction myScratchPads "pavu")
@@ -200,7 +201,7 @@ myConfig =
     , terminal = myTerminal
     , manageHook = myManageHook
     , workspaces = myWorkspaces
-    , logHook = historyHook
+    , logHook = historyHook >> updatePointer (0.95, 0.5) (0, 0)
     , borderWidth = myBorderWidth
     , layoutHook = myLayout
     , normalBorderColor = myNormColor