mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/gnus/html2text.el (html2text-clean-anchor): Check for quotes around

Browse source 
`href' value.
This commit is contained in:
Andreas Schwab 2011-10-11 22:20:08 +02:00
parent e9b5f88812
commit 75d5291229
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2011-10-11 Andreas Schwab <schwab@linux-m68k.org>
* html2text.el (html2text-clean-anchor): Check for quotes around
`href' value.
2011-10-11 Teodor Zlatanov <tzz@lifelogs.com>
* spam.el (spam-check-BBDB): Simplify and support BBDB 3.x when

3
lisp/gnus/html2text.el
View file

@ -358,7 +358,8 @@ formatting, and then moved afterward.")
(delete-region p1 p4)
(when href
(goto-char p1)
(insert (substring href 1 -1))
(insert (if (string-match "\\`['\"].*['\"]\\'" href)
(substring href 1 -1) href))
(put-text-property p1 (point) 'face 'bold))))
;;