Have `R' in eww save the history

(eww-readable): Save the history before displaying so that we can
go back to the non-readable version.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 17d006604c8119b8800cf97867370316916f3064..ddd9fd787bb3031d950e5a750f86f61b8ee3641a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,8 @@
        * net/eww.el (eww-display-html): The charset is called `utf-8',
        not `utf8'.
        (eww-readable): Decode the saved text correctly.
+       (eww-readable): Save the history before displaying so that we can
+       go back to the non-readable version.
 
 2014-11-02  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 0e74201173e8ad83b301d7ce43cf2dee5834f421..6060062abb3329922a244073627f5daaf50dac38 100644 (file)
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -429,6 +429,7 @@ the like."
                   (coding-system-error nil))
                 (libxml-parse-html-region (point-min) (point-max))))))
     (eww-score-readability dom)
+    (eww-save-history)
     (eww-display-html nil nil
                      (shr-retransform-dom
                       (eww-highest-readability dom)))