Update the window title after moving in the history

* net/eww.el (eww-restore-history): Update the window title after
moving in the history.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 79b46f0f3f424026757a3349fc0612c3e257d9ff..469bd37ec8a35e0480eaac6837ceaa94c1c20dd5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-12-01  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * net/eww.el (eww-restore-history): Update the window title after
+       moving in the history.
+
 2013-12-01  Dmitry Gutov  <dgutov@yandex.ru>
 
        * vc/log-edit.el (log-edit-mode-map): Add binding for

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 0c84e782aa34c7830a7e32e2776fb2a5edf40c7d..28ef237b612b9d9c47d3c030a20a4aa2cc8a621e 100644 (file)
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -431,7 +431,8 @@ word(s) will be searched for via `eww-search-prefix'."
     (insert (plist-get elem :text))
     (goto-char (plist-get elem :point))
     (setq eww-current-url (plist-get elem :url)
-         eww-current-title (plist-get elem :title))))
+         eww-current-title (plist-get elem :title))
+    (eww-update-header-line-format)))
 
 (defun eww-next-url ()
   "Go to the page marked `next'.