From 8c6abcaebc16c8dd805a3a8f9cc57e35890c3bc5 Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Thu, 6 Feb 2020 15:25:31 -0700 Subject: Multiple changes. Mostly added a prompt to quickly switch between windows by fuzzy-finding them --- src/Main.hs | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'src/Main.hs') diff --git a/src/Main.hs b/src/Main.hs index e3c1cc1..acde5a2 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -33,19 +33,20 @@ main = do , normalBorderColor = "#000000" , layoutHook = spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True $ - InterceptLayout $ myLayout , startupHook = do spawn fp , manageHook = composeAll [ isFullscreen --> doFullFloat , className =? "Tilda" --> doFloat + , className =? "yakuake" --> doFloat , className =? "MPlayer" --> doFloat , className =? "mpv" --> doFloat , className =? "gnubby_ssh_prompt" --> doFloat ] , workspaces = map return (['0'..'9'] ++ ['a'..'z']) - , handleEventHook = fullscreenEventHook + , handleEventHook = fullscreenEventHook + , focusFollowsMouse = False } let toggleStructsKey XConfig {XMonad.modMask = modMask} = (modMask, xK_b) @@ -66,7 +67,8 @@ main = do , ppLayout = const "" , ppExtras = [showLayout] , ppOrder = \ss -> - let (icons, etc) = partition ("