Function: shr-tag-math

shr-tag-math is a byte-compiled function defined in shr.el.gz.

Signature

(shr-tag-math DOM)

Source Code

;; Defined in /usr/src/emacs/lisp/net/shr.el.gz
(defun shr-tag-math (dom)
  ;; Sometimes a math element contains a plain text annotation
  ;; (typically TeX notation) in addition to MathML markup.  If we pass
  ;; that to `dom-generic', the formula is printed twice.  So we select
  ;; only the annotation if available.
  (shr-generic
   (thread-first
     dom
     (dom-child-by-tag 'semantics)
     (dom-child-by-tag 'annotation)
     (or dom))))