procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Also allow setting the paragraph direction to nil

Browse source 
* lisp/net/eww.el (eww-toggle-paragraph-direction): Also allow
setting the paragraph direction to nil ("auto").
This commit is contained in:
Lars Ingebrigtsen 2016-03-01 11:31:37 +11:00
parent bbe8a899ac
commit cb1e3da12e
1 changed files with 11 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
lisp/net/eww.el
View file

@ -608,13 +608,19 @@ Currently this means either text/html or application/xhtml+xml."
(view-buffer buf)))
(defun eww-toggle-paragraph-direction ()
"Toggle the paragraphs direction between left-to-right and right-to-left."
"Cycle the paragraph direction between left-to-right, right-to-left and auto."
(interactive)
(setq bidi-paragraph-direction
(if (eq bidi-paragraph-direction 'left-to-right)
'right-to-left
'left-to-right))
(message "The paragraph direction is now %s" bidi-paragraph-direction))
(cond ((eq bidi-paragraph-direction 'left-to-right)
nil)
((eq bidi-paragraph-direction 'right-to-left)
'left-to-right)
(t
'right-to-left)))
(message "The paragraph direction is now %s"
(if (null bidi-paragraph-direction)
"automatic"
bidi-paragraph-direction)))
(defun eww-readable ()
"View the main \"readable\" parts of the current web page.