diff options
Diffstat (limited to 'accounts')
-rw-r--r-- | accounts/gkleen@sif/xmonad/xmonad.hs | 4 |
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 | |||
179 | hostFromName h | 179 | hostFromName 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" |