From c8931aef4a2ffab40fb75830077210d810e50b55 Mon Sep 17 00:00:00 2001
From: Josh Rahm <rahm@google.com>
Date: Mon, 10 Jan 2022 14:57:47 -0700
Subject: Add emoticon-select.

It's the same as emoji select, but with emoticons.

Key bound to <C-z>E (capital E, as opposed to <C-z>e for emojis)
---
 src/Internal/Keys.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/Internal')

diff --git a/src/Internal/Keys.hs b/src/Internal/Keys.hs
index fc0244b..bf9b62c 100644
--- a/src/Internal/Keys.hs
+++ b/src/Internal/Keys.hs
@@ -231,8 +231,9 @@ keymap = runKeys $ do
       bind xK_c $ do
         shiftMod CopyWindow.killAllOtherCopies
 
-      bind xK_e $
+      bind xK_e $ do
         (justMod -|- noMod) $ spawn "emoji-select.sh"
+        (shiftMod -|- rawMask shiftMask) $ spawn "emoticon-select.sh"
 
       bind xK_a $
         (justMod -|- noMod) $ spawn "set-sink.sh"
-- 
cgit