gkleen@sif: move zoom to own workspace

1 files changed, 3 insertions, 0 deletions

diff --git a/accounts/gkleen@sif/xmonad/xmonad.hs b/accounts/gkleen@sif/xmonad/xmonad.hs
index f3a59f34..0308f0a0 100644
--- a/accounts/gkleen@sif/xmonad/xmonad.hs
+++ b/accounts/gkleen@sif/xmonad/xmonad.hs
@@ -221,6 +221,7 @@ hostFromName h
                                               , Just $ (className =? "Nvidia-settings") -?> doCenterFloat
                                               , Just $ fmap ("Minetest" `isInfixOf`) title -?> doIgnore
                                               , Just $ fmap ("Automachef" `isInfixOf`) title -?> doIgnore
+                                              , assign "call"    $ className =? "zoom"
                                               ])
                                           , hWsp = hWsp
                                           , hCoWsp = hCoWsp
@@ -306,6 +307,7 @@ hostFromName h
                                   , (4, "read")
                                   , (5, "monitor")
                                   , (6, "uni")
+                                  , (8, "call")
                                   , (9, "media")
                                   , (10, "mpv")
                                   ]
@@ -531,6 +533,7 @@ main = do
                                       onWorkspace (wsp 6) workLayouts $
                                       onWorkspace (wsp 4) (tabbedLayout' ||| tabbedLayoutHoriz' ||| Dwindle R CW 1 (5 % 100)) $
                                       onWorkspace (wsp 5) (tabbedLayout''' ||| Dwindle R CW 1 (5 % 100)) $
+                                      onWorkspace (wsp 8) tabbedLayout''' $
                                       onWorkspace (wsp 10) (tabbedLayout''' ||| combineTwoP (TwoPane (1 % 100) (3 % 4)) tabbedLayout''' tabbedLayout''' (ClassName "mpv") ||| Dwindle R CW 1 (5 % 100)) $
                                       defaultLayouts
                                     ) $