aboutsummaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorJosh Rahm <joshuarahm@gmail.com>2020-02-02 13:19:59 -0700
committerJosh Rahm <joshuarahm@gmail.com>2020-02-02 13:19:59 -0700
commitd04d6f8ccee05f4b70d88f4a4cc3f36b1c3d5744 (patch)
tree52cf6dc6fd201d64d01b91bd4d215cdecf3ef7cc /src/Main.hs
parentb5cd0351a530d06e8648a12399d90524eafb8569 (diff)
downloadrde-d04d6f8ccee05f4b70d88f4a4cc3f36b1c3d5744.tar.gz
rde-d04d6f8ccee05f4b70d88f4a4cc3f36b1c3d5744.tar.bz2
rde-d04d6f8ccee05f4b70d88f4a4cc3f36b1c3d5744.zip
Add Tilda and MPV float classes + XScreenSaver lock/suspend shortcut.
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs5
1 files changed, 4 insertions, 1 deletions
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
]
}