From 7bd59751a820dbdfb132ae2f06be518bd2f7fad4 Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Fri, 7 Feb 2020 14:59:09 -0700 Subject: 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. --- src/Main.hs | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'src/Main.hs') 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 -- cgit