From d04d6f8ccee05f4b70d88f4a4cc3f36b1c3d5744 Mon Sep 17 00:00:00 2001
From: Josh Rahm <joshuarahm@gmail.com>
Date: Sun, 2 Feb 2020 13:19:59 -0700
Subject: Add Tilda and MPV float classes + XScreenSaver lock/suspend shortcut.

---
 src/Main.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src/Main.hs')

diff --git a/src/Main.hs b/src/Main.hs
index b94d4cc..f48ce63 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -7,6 +7,7 @@ import System.Directory
 import System.FilePath
 import System.Process
 import Internal.Layout
+import XMonad.Hooks.ManageHelpers
 
 import Internal.Keys
 
@@ -28,8 +29,10 @@ main = do
        , startupHook = do
            spawn fp
        , manageHook = composeAll [
-           className =? "Tilda" --> doFloat
+           isFullscreen --> doFloat
+         , className =? "Tilda" --> doFloat
          , className =? "MPlayer" --> doFloat
+         , className =? "mpv" --> doFloat
          ]
        }
 
-- 
cgit