aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop
diff options
context:
space:
mode:
Diffstat (limited to 'src/Rahm/Desktop')
-rw-r--r--src/Rahm/Desktop/Keys.hs14
1 files changed, 3 insertions, 11 deletions
diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index 9ca862a..8ec3aeb 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -395,7 +395,7 @@ bindings = do
bind xK_b $ do
justMod $ spawnX "bluetooth-select.sh"
- bind xK_u $ do
+ bind xK_i $ do
justMod $ spawnX "notes-select.sh"
bind xK_c $ do
@@ -631,10 +631,6 @@ bindings = do
flip whenJust toggleWindowInSelection =<< withWindowSet (return . W.peek)
bind xK_m $ do
- rawMask
- mod2Mask
- (logs Info "Testing Mod2Mask" :: X ())
-
justMod
$ doc
"Mark the windows described by the window set with a given character.\n\n\t\
@@ -925,12 +921,8 @@ bindings = do
-- Explode
bind xK_c $ do
noMod -|- justMod $
- doc "Toggle explode on the workspace" $ do
- sendMessage
- ( toggleExplodeM
- movePopupToCurrentWorkspace
- movePopupToHiddenWorkspace
- )
+ doc "Run Quick-clip" $
+ spawnX "quick-clip.sh"
bindOtherKeys $ \(_, _, s) ->
logs Info "Unhandled key pressed: %s" s