summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2021-12-19 20:25:44 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2021-12-19 20:25:44 +0100
commite34017fdbec8b794fcc3201f6b85ec09a964b555 (patch)
tree778e8e3993ad9451f2204b401b455685061d9e5c
parent6aac4caaff7c3217b917f3a08a114ab68f082740 (diff)
downloademacs-e34017fdbec8b794fcc3201f6b85ec09a964b555.tar.gz
Further tweaks to emoji person groups
* lisp/international/emoji.el (emoji--score): Don't take the bit after the colon into consideration, like in "kiss: person, person, light skin tone, medium-light skin tone".
-rw-r--r--lisp/international/emoji.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/emoji.el b/lisp/international/emoji.el
index 205a803a25e..cd6684c3f6a 100644
--- a/lisp/international/emoji.el
+++ b/lisp/international/emoji.el
@@ -361,7 +361,8 @@ the name is not known."
derivations))))
(defun emoji--score (string)
- (if (string-match-p "person\\|people" string)
+ (if (string-match-p "person\\|people"
+ (replace-regexp-in-string ":.*" "" string))
0
1))