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

Preserve peer information for web page in eww-readable

Browse source 
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)
This commit is contained in:
Eshel Yaron 2023-03-31 17:54:12 +03:00 • committed by Eli Zaretskii
parent cb8d6ab648
commit 3619663f98
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/net/eww.el
View file

@ -1012,7 +1012,7 @@ the like."
(list 'base (list (cons 'href base)) (list 'base (list (cons 'href base))
(eww-highest-readability dom)) (eww-highest-readability dom))
nil (current-buffer)) 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))) (plist-put eww-data elem (plist-get old-data elem)))
(eww--after-page-change))) (eww--after-page-change)))