* net/eww.el (eww-add-bookmark): Fix bookmark titles.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4b72eb805617fbfd778bb08eed6f0fab3a501bcd..8cabef92ad0c28994f2597ced4c4eecc904bab49 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,10 @@
+2014-11-20  Mark Oteiza  <mvoteiza@udel.edu>  (tiny change)
+
+       * net/eww.el (eww-add-bookmark): Fix bookmark titles.
+
 2014-11-17  Mark Oteiza  <mvoteiza@udel.edu>  (tiny change)
 
-       * net/eww.el (eww-mode-map): Bind backtab to shr-previous-link
+       * net/eww.el (eww-mode-map): Bind backtab to shr-previous-link.
 
 2014-11-23  Kenjiro Nakayama  <nakayamakenjiro@gmail.com>
 

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index f2a1631a5baedb1ccc880f7dbe9a7bbe27259c28..12b27bcd0750d8fd288f82782067303289ceca53 100644 (file)
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1339,7 +1339,7 @@ Differences in #targets are ignored."
   (if (y-or-n-p "bookmark this page? ")
       (progn
        (let ((title (replace-regexp-in-string "[\n\t\r]" " "
-                                              (plist-get eww-data :url))))
+                                              (plist-get eww-data :title))))
          (setq title (replace-regexp-in-string "\\` +\\| +\\'" "" title))
          (push (list :url (plist-get eww-data :url)
                      :title title