diff options
| author | John Wiegley <johnw@newartisans.com> | 2016-03-03 23:53:08 -0800 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2016-03-03 23:53:08 -0800 |
| commit | 692caf1e8d1657fbe4809294df6791c2879a7bb1 (patch) | |
| tree | 0c6357b6325adbf0d675851d7a655ce9636b51e7 /lisp/net/eww.el | |
| parent | 018bdf7528d0d4bb0560d86b84c21ae9fed1206a (diff) | |
| parent | b13cab683c6060e002906fc944680aaa5f4ac123 (diff) | |
| download | emacs-692caf1e8d1657fbe4809294df6791c2879a7bb1.tar.gz emacs-692caf1e8d1657fbe4809294df6791c2879a7bb1.tar.bz2 emacs-692caf1e8d1657fbe4809294df6791c2879a7bb1.zip | |
Merge from origin/emacs-25
b13cab6 Add a eww command to toggle paragraph direction
4e46128 * nextstep/WISHLIST: Merge into etc/TODO and remove.
9e078e5 Fix char signedness issue in bidi code
064adf6 * lib-src/pop.c (socket_connection): Fix format string.
14060a9 Avoid inflooping in thing-at-point-looking-at
098d47b * lisp/emacs-lisp/derived.el (define-derived-mode): Revert
indent change.
b5db8e0 etc/PROBLEMS: Mention problems with using file descriptors
ec10ef9 * lisp/apropos.el (apropos-variable): Doc fix. (Bug#22813).
d2dd614 Remove unneeded workaround in xftfont.c
9b7593c ; * etc/NEWS: Reflect latest changes in saveplace.
fde0cd1 * lisp/saveplace.el (save-place-local-mode): New minor mode
06a872b Fix redisplay on a TTY after 'make-frame'
95f5a43 Make double-click-1 work with unbalanced parens in CC Mode.
Fixes bug#5560.
7d206fc Input method polish-slash should not use keyboard translation
8be32cf Fix an assertion
040e0d6 Fix 'toggle-save-place'
5244db2 * src/keyboard.c: Don't inadvertently set immediate_echo (bug#22581)
Diffstat (limited to 'lisp/net/eww.el')
| -rw-r--r-- | lisp/net/eww.el | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 3c3736ac376..d37b1b3261b 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el @@ -617,6 +617,15 @@ Currently this means either text/html or application/xhtml+xml." (html-mode)))) (view-buffer buf))) +(defun eww-toggle-paragraph-direction () + "Toggle the paragraphs direction between left-to-right and right-to-left." + (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)) + (defun eww-readable () "View the main \"readable\" parts of the current web page. This command uses heuristics to find the parts of the web page that @@ -701,6 +710,7 @@ the like." (define-key map "s" 'eww-switch-to-buffer) (define-key map "S" 'eww-list-buffers) (define-key map "F" 'eww-toggle-fonts) + (define-key map "D" 'eww-toggle-paragraph-direction) (define-key map [(meta C)] 'eww-toggle-colors) (define-key map "b" 'eww-add-bookmark) @@ -729,7 +739,8 @@ the like." ["List cookies" url-cookie-list t] ["Toggle fonts" eww-toggle-fonts t] ["Toggle colors" eww-toggle-colors t] - ["Character Encoding" eww-set-character-encoding])) + ["Character Encoding" eww-set-character-encoding] + ["Toggle Paragraph Direction" eww-toggle-paragraph-direction])) map)) (defvar eww-tool-bar-map |