diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2017-01-26 18:32:48 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2017-01-26 18:32:48 +0100 |
| commit | 950c0d8969bae1e763016adedc62345c79cfad8a (patch) | |
| tree | 1a3f5106afb9419692f10153429e252ba3f32939 /lisp/net/eww.el | |
| parent | 9527d201c1c5a323eb605e260f057b163722712e (diff) | |
| download | emacs-950c0d8969bae1e763016adedc62345c79cfad8a.tar.gz emacs-950c0d8969bae1e763016adedc62345c79cfad8a.tar.bz2 emacs-950c0d8969bae1e763016adedc62345c79cfad8a.zip | |
Make eww buffers prettier in the buffer listing
* lisp/net/eww.el (eww-render): Put the currently visited URL
into the buffer listing (bug#23738).
(eww-render): Ditto.
Diffstat (limited to 'lisp/net/eww.el')
| -rw-r--r-- | lisp/net/eww.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 172044a12ec..15911f6e85f 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el @@ -355,9 +355,11 @@ Currently this means either text/html or application/xhtml+xml." "utf-8")))) (data-buffer (current-buffer)) last-coding-system-used) - ;; Save the https peer status. (with-current-buffer buffer - (plist-put eww-data :peer (plist-get status :peer))) + ;; Save the https peer status. + (plist-put eww-data :peer (plist-get status :peer)) + ;; Make buffer listings more informative. + (setq list-buffers-directory url)) (unwind-protect (progn (cond @@ -849,6 +851,8 @@ the like." (erase-buffer) (insert text) (goto-char (plist-get elem :point)) + ;; Make buffer listings more informative. + (setq list-buffers-directory (plist-get elem :url)) (eww-update-header-line-format)))) (defun eww-next-url () |