summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEshel Yaron <me@eshelyaron.com>2023-03-31 17:54:12 +0300
committerEli Zaretskii <eliz@gnu.org>2023-04-02 10:38:44 +0300
commit3619663f9822f7732854a13e6a890cb0925fbfaa (patch)
tree111e7b38f49fb57f1064ee51663541262462736f
parentcb8d6ab648fa74f03b0ba1c5f33eb53e1e017f3a (diff)
downloademacs-3619663f982.tar.gz
Preserve peer information for web page in eww-readable
The :peer property in eww-data affects the face of the page title in 'header-line-format' as set by 'eww-update-header-line-format'. Preserving this property in eww-readable avoids having the header line's appearance change when this command is called. * lisp/net/eww.el (eww-readable): Preserve eww-data's :peer property. (Bug#62574)
-rw-r--r--lisp/net/eww.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 22b078217bd..eac47e592b2 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1012,7 +1012,7 @@ the like."
(list 'base (list (cons 'href base))
(eww-highest-readability dom))
nil (current-buffer))
- (dolist (elem '(:source :url :title :next :previous :up))
+ (dolist (elem '(:source :url :title :next :previous :up :peer))
(plist-put eww-data elem (plist-get old-data elem)))
(eww--after-page-change)))