aboutsummaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorJosh Rahm <rahm@google.com>2020-02-07 14:59:09 -0700
committerJosh Rahm <rahm@google.com>2020-02-07 14:59:09 -0700
commit7bd59751a820dbdfb132ae2f06be518bd2f7fad4 (patch)
treec59b266543888e66861e5bef98b2d06222057348 /src/Main.hs
parent8c6abcaebc16c8dd805a3a8f9cc57e35890c3bc5 (diff)
downloadrde-7bd59751a820dbdfb132ae2f06be518bd2f7fad4.tar.gz
rde-7bd59751a820dbdfb132ae2f06be518bd2f7fad4.tar.bz2
rde-7bd59751a820dbdfb132ae2f06be518bd2f7fad4.zip
Add LayoutModifier that ollows windows to be zoomed on with modm-z. When this happens, the window will float in the middle of the screen.
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs7
1 files changed, 2 insertions, 5 deletions
diff --git a/src/Main.hs b/src/Main.hs
index acde5a2..d80666a 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -31,11 +31,8 @@ main = do
, keys = \config -> mempty
, focusedBorderColor = "#FFFFFF"
, normalBorderColor = "#000000"
- , layoutHook =
- spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True $
- myLayout
- , startupHook = do
- spawn fp
+ , layoutHook = myLayout
+ , startupHook = spawn fp
, manageHook = composeAll [
isFullscreen --> doFullFloat
, className =? "Tilda" --> doFloat