Cleaning up the managehooks in the config.

This commit is contained in:
Derek Taylor
2020-05-22 10:50:18 -05:00
parent 03e0d0403f
commit b2e2b1137c
+14 -10
View File
@@ -378,16 +378,20 @@ myWorkspaces = clickable . (map xmobarEscape)
myManageHook :: Query (Data.Monoid.Endo WindowSet) myManageHook :: Query (Data.Monoid.Endo WindowSet)
myManageHook = composeAll myManageHook = composeAll
[ className =? "firefox" --> doShift "<action=xdotool key super+2>www</action>" -- using 'doShift ( myWorkspaces !! 7)' sends program to workspace 8!
, title =? "qutebrowser" --> doShift "<action=xdotool key super+2>www</action>" -- I'm doing it this way because otherwise I would have to write out
, title =? "irssi" --> doShift "<action=xdotool key super+6>chat</action>" -- the full name of my clickable workspaces, which would look like:
, className =? "mpv" --> doShift "<action=xdotool key super+8>vid</action>" -- doShift "<action xdotool super+n>n</action>"
, className =? "vlc" --> doShift "<action=xdotool key super+8>vid</action>" [ className =? "obs" --> doShift ( myWorkspaces !! 7)
, title =? "Oracle VM VirtualBox Manager" --> doFloat , title =? "firefox" --> doShift ( myWorkspaces !! 1)
, className =? "Oracle VM VirtualBox Manager" --> doShift "<action=xdotool key super+5>vbox</action>" , title =? "qutebrowser" --> doShift ( myWorkspaces !! 1)
, className =? "Gimp" --> doFloat , className =? "mpv" --> doShift ( myWorkspaces !! 7)
, className =? "Gimp" --> doShift "<action=xdotool key super+9>gfx</action>" , className =? "vlc" --> doShift ( myWorkspaces !! 7)
, (className =? "firefox" <&&> resource =? "Dialog") --> doFloat -- Float Firefox Dialog , className =? "Gimp" --> doShift ( myWorkspaces !! 8)
, className =? "Gimp" --> doFloat
, title =? "Oracle VM VirtualBox Manager" --> doFloat
, className =? "Oracle VM VirtualBox Manager" --> doShift ( myWorkspaces !! 6)
, (className =? "firefox" <&&> resource =? "Dialog") --> doFloat -- Float Firefox Dialog
] <+> namedScratchpadManageHook myScratchPads ] <+> namedScratchpadManageHook myScratchPads
------------------------------------------------------------------------ ------------------------------------------------------------------------