summaryrefslogtreecommitdiff
path: root/accounts/gkleen@sif/xmonad/xmonad.hs
diff options
context:
space:
mode:
Diffstat (limited to 'accounts/gkleen@sif/xmonad/xmonad.hs')
-rw-r--r--accounts/gkleen@sif/xmonad/xmonad.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/accounts/gkleen@sif/xmonad/xmonad.hs b/accounts/gkleen@sif/xmonad/xmonad.hs
index 96f8b23e..9e8af247 100644
--- a/accounts/gkleen@sif/xmonad/xmonad.hs
+++ b/accounts/gkleen@sif/xmonad/xmonad.hs
@@ -179,8 +179,7 @@ hostFromName h@("vali") = defaultHost { hName = h
179hostFromName h 179hostFromName h
180 | h `elem` ["hel", "sif"] = defaultHost { hName = h 180 | h `elem` ["hel", "sif"] = defaultHost { hName = h
181 , hManageHook = namedScratchpadManageHook scratchpads <+> composeOne (catMaybes 181 , hManageHook = namedScratchpadManageHook scratchpads <+> composeOne (catMaybes
182 [ assign "work" $ className =? "Alacritty" 182 [ assign "mpv" $ className =? "mpv"
183 , assign "mpv" $ className =? "mpv"
184 , assign "mpv" $ stringProperty "WM_WINDOW_ROLE" =? "presentation" 183 , assign "mpv" $ stringProperty "WM_WINDOW_ROLE" =? "presentation"
185 , assign "read" $ stringProperty "WM_WINDOW_ROLE" =? "presenter" 184 , assign "read" $ stringProperty "WM_WINDOW_ROLE" =? "presenter"
186 , assign "mpv" $ className =? "factorio" 185 , assign "mpv" $ className =? "factorio"
@@ -200,6 +199,7 @@ hostFromName h
200 , Just $ (className =? "Alacritty" <&&> resource =? "htop") -?> centerFloat 199 , Just $ (className =? "Alacritty" <&&> resource =? "htop") -?> centerFloat
201 , Just $ (className =? "Scp-dbus-service.py") -?> centerFloat 200 , Just $ (className =? "Scp-dbus-service.py") -?> centerFloat
202 , Just $ (className =? "Alacritty" <&&> resource =? "log") -?> centerFloat 201 , Just $ (className =? "Alacritty" <&&> resource =? "log") -?> centerFloat
202 , assign "work" $ className =? "Alacritty"
203 , Just $ (appName =? "Edit with Emacs FRAME") -?> centerFloat 203 , Just $ (appName =? "Edit with Emacs FRAME") -?> centerFloat
204 , assign' ["work", "uni"] $ (className =? "Emacs" <&&> appName /=? "Edit with Emacs FRAME") 204 , assign' ["work", "uni"] $ (className =? "Emacs" <&&> appName /=? "Edit with Emacs FRAME")
205 , assign' ["work", "uni"] $ className =? "jetbrains-idea-ce" 205 , assign' ["work", "uni"] $ className =? "jetbrains-idea-ce"