summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2016-03-01 10:48:36 +1100
committerLars Ingebrigtsen <larsi@gnus.org>2016-03-01 10:48:36 +1100
commitfc819ea94ef1f466e422ed290e1fa01d5ec0302b (patch)
treeb9368ca9b85c5a3a827b5ef04ce753792556eecd /lisp
parentf71dbb30eeb4b9885ae1c9c580f65c956008d0cf (diff)
downloademacs-fc819ea94ef1f466e422ed290e1fa01d5ec0302b.tar.gz
Respect <html dir=auto>
* lisp/net/shr.el (shr-tag-html): Respect the "auto" directional HTML setting.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/net/shr.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index fc6fca7060e..ab04b9a065a 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1178,7 +1178,9 @@ ones, in case fg and bg are nil."
((equal dir "ltr")
(setq bidi-paragraph-direction 'left-to-right))
((equal dir "rtl")
- (setq bidi-paragraph-direction 'right-to-left))))
+ (setq bidi-paragraph-direction 'right-to-left))
+ ((equal dir "auto")
+ (setq bidi-paragraph-direction nil))))
(shr-generic dom))
(defun shr-tag-body (dom)