Function: article-emojize-symbols

article-emojize-symbols is an interactive and byte-compiled function defined in gnus-art.el.gz.

Signature

(article-emojize-symbols)

Documentation

Display symbols (that have an emoji version) as emojis.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-art.el.gz
(defun article-emojize-symbols ()
  "Display symbols (that have an emoji version) as emojis."
  (interactive nil gnus-article-mode)
  (when-let* ((font (and (display-multi-font-p)
                         (car (internal-char-font nil ?😀)))))
    (save-excursion
      (let ((inhibit-read-only t))
        (goto-char (point-min))
        (while (re-search-forward "[[:multibyte:]]" nil t)
          ;; If there's already a grapheme cluster here, skip it.
          (when (and (not (find-composition (point)))
                     (font-has-char-p font (char-after (match-beginning 0))))
            (insert "\N{VARIATION SELECTOR-16}")))))))