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

This commit is contained in:
Mark Oteiza 2014-11-23 16:40:45 +01:00 committed by Lars Magne Ingebrigtsen
parent dd01e20628
commit 0445aff691
2 changed files with 6 additions and 2 deletions

View file

@ -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>

View file

@ -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