Function: shr-tag-html

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

Signature

(shr-tag-html DOM)

Source Code

;; Defined in /usr/src/emacs/lisp/net/shr.el.gz
;;; Tag-specific rendering rules.

(defun shr-tag-html (dom)
  (let ((dir (dom-attr dom 'dir)))
    (cond
     ((equal dir "ltr")
      (setq bidi-paragraph-direction 'left-to-right))
     ((equal dir "rtl")
      (setq bidi-paragraph-direction 'right-to-left))
     ((equal dir "auto")
      (setq bidi-paragraph-direction nil))))
  (shr-generic dom))