emacs-emojify

fork of https://github.com/iqbalansari/emacs-emojify
Log | Files | Refs | LICENSE

commit c1662171911f3515e50ef84980c943357b85ba9a
parent 1b726412f19896abf5e4857d4c32220e33400b55
Author: massi <git@massi.world>
Date:   Fri, 30 Aug 2024 00:51:03 -0700

only show emojis for selected styles

Diffstat:
Memojify.el | 13+++++++------
1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/emojify.el b/emojify.el @@ -2081,12 +2081,13 @@ See `tabulated-list-print-entry' to understand the arguments ID and COLS." (let (entries count) (emojify-emojis-each (lambda (emoji data) - (push (list emoji (vector (ht-get data "name") - emoji - (ht-get data "style") - (if (ht-get data "custom") "Yes" "No") - emoji)) - entries))) + (when (seq-contains emojify-emoji-styles (intern (ht-get data "style"))) + (push (list emoji (vector (ht-get data "name") + emoji + (ht-get data "style") + (if (ht-get data "custom") "Yes" "No") + emoji)) + entries)))) (setq count (length entries))