commit 538516511ce06f0151d18069c050d096211b1e82 parent c2708194d9778b044dbd75b1cc70e9b9159821ff Author: Iqbal Ansari <iqbalansari02@yahoo.com> Date: Mon, 13 Mar 2017 14:51:04 +0530 Add the emoji text to the emoji data This makes the hash-table storing the emoji data self contained Diffstat:
| M | emojify.el | | | 15 | ++++++++++++++- |
1 file changed, 14 insertions(+), 1 deletion(-)
diff --git a/emojify.el b/emojify.el @@ -707,7 +707,6 @@ and then `emojify-emojis'." (let (unicode-emojis ascii-emojis) (ht-each (lambda (emoji data) - (when (string= (ht-get data "style") "unicode") (push emoji unicode-emojis)) @@ -730,6 +729,20 @@ and then `emojify-emojis'." emojify-user-emojis))) (setq emojify--user-emojis (ht-from-alist emoji-pairs)) (setq emojify--user-emojis-regexp (regexp-opt (mapcar #'car emoji-pairs)))) + (message "[emojify] User emojis are not in correct format ignoring them."))) + + (emojify-emojis-each (lambda (emoji data) + ;; Add the emoji text to data, this makes the values + ;; of the `emojify-emojis' standalone containing all + ;; data about the emoji + (ht-set! data "emoji" emoji))) + + (ht-each (lambda (emoji data) + ;; Add the emoji text to data, this makes the values + ;; of the `emojify-emojis' standalone containing all + ;; data about the emoji + (ht-set! data "emoji" emoji)) + emojify--user-emojis)) (message "[emojify] User emojis are not in correct format ignoring them.")))) (defvar emojify-emoji-keymap