From: Mark Oteiza <mvoteiza@udel.edu>
Date: Sun, 23 Nov 2014 15:40:45 +0000 (+0100)
Subject: * net/eww.el (eww-add-bookmark): Fix bookmark titles.
X-Git-Tag: emacs-25.0.90~2635^2~365
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0445aff69108da12e5e445cb2bd11fac16d84945;p=emacs.git

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4b72eb80561..8cabef92ad0 100644
--- 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 f2a1631a5ba..12b27bcd075 100644
--- 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