From 8ddcf499ce97be0aa607677cbca52d810c969684 Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Fri, 15 Mar 2024 11:02:29 -0600 Subject: Add some keybindings. Add some manage hooks. --- src/Rahm/Desktop/Keys.hs | 18 ------------------ 1 file changed, 18 deletions(-) (limited to 'src/Rahm/Desktop') diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs index a6d1a8a..3866937 100644 --- a/src/Rahm/Desktop/Keys.hs +++ b/src/Rahm/Desktop/Keys.hs @@ -1350,24 +1350,6 @@ windowSpecificBindings config = do rawMask (m .|. mod3Mask) $ emitKey (m .|. controlMask, xK_Page_Down) - configureIf (flip elem (browsers ++ spotify) <$> className) $ do - bind xK_h $ do - rawMask controlMask $ emitKey (0, xK_BackSpace) - forM_ mods $ \mask -> - rawMask (altMask .|. mask) $ emitKey (mask, xK_Left) - - bind xK_t $ - forM_ mods $ \mask -> - rawMask (altMask .|. mask) $ emitKey (mask, xK_Down) - - bind xK_c $ - forM_ mods $ \mask -> - rawMask (altMask .|. mask) $ emitKey (mask, xK_Up) - - bind xK_n $ - forM_ mods $ \mask -> - rawMask (altMask .|. mask) $ emitKey (mask, xK_Right) - configureIf (flip elem browsers <$> className) $ do -- if the window is a browser, configure these bindings. Lots of browsers -- make up their own garbage bindings that are not standard across many -- cgit