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".

diff --git a/lisp/international/emoji.el b/lisp/international/emoji.el
index 205a803a25eec68e54f8efe31603a8fea48c51a3..cd6684c3f6afeb8854ff22b75b5c61315599697d 100644 (file)
--- 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))